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PS- NEW CARDCO AT- NEW CARDCO 
PRINTER INTERFACE for PRINTER INTERFACE for 
the Commodore-64™ and the ATARI COMPUTER. Use 
УІС-20% Personal Computers. Your Atari Computer with any 
Use with any standard parallel standard parallel input printer 
OR serial printer. Requires по impact dot matrix, thermal 
special programming. Ready to dot matrix, daisy wheel, letter 
hook-up; includes all necessary quality. ink jet and laser 
cables and plugs. CARD/?PS printer, CARD/?AT includes 
all necessary cables and 
connectors. 


CARDCO is constantly producing new products. A full 
line of Commodore hardware and software; letter quality 
printers for any computer: TV monitor tuners for any 
composite color monitors and a host of other quality 
computer products. WRITE for FREE illustrated 
literature and prices. 
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MT/1 MONITOR TUNER MT/2-UHF/VHF MONITOR 
with REMOTE CONTROL TUNER to turn any composite 


for any composite color color monitor into a television 
monitor to TURN YOUR set. For color or monochrome 
MONITOR into a monitors; has separate audio 
TELEVISION SET. Receive апа video outputs; receives 
sharper, clearer television vivid, bright television pictures 
pictures on your composite that will amaze you. 


color monitor with a flick of 
the switch. Separate audio and 
video outputs; also for stereo 
sound systems. 


- cardco, inc. 
300 S. Topeka 

Wichita, Kansas 67202 

(316) 267-3807 


“Тһе workd's largest manufacturer of Commodore accessories." 
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VIEW FROM TH: PRIIDGIE 


e really do put these issues together 
with a plan in mind. For the Decem- 
ber Ahoy! you hold in your hands, 
our plan was to spotlight the peripher- 

al for which the maximum number of our readers 

would be writing to the north pole. Figuring that 
most of you already owned a monitor of some kind 
and a disk drive, the peripheral that seemed to fit 
the bill was a printer. 

Two articles in this issue devote themselves to 
that theme. Tom Benford's A Primer on Printers ed- 
ucates you in the details, both elementary and eso- 
teric, that you'll need to make an intelligent selec- 
tion. (Turn to page 15.) And Morton Kevelson's 
Printer Interfacing Revisited (part I in this issue) 
provides the much-requested update to the tutorial/ 
review that appeared in the March and April Ahoy! 
(Turn to page 19.) 

Compilers do more than generate high-level pro- 
gramming languages. Every time we've featured 
them in Ahoy! they've generated a great deal of in- 
terest, This issue, Morton Kevelson provides A User 
Guide to KMMM Pascal, which will turn your 
BASIC into the highly structured language of educa- 


“The computer checks out okay. 1 don't know 
what the problem could be.” 


tors. (Turn to page 43.) 

Where can you build a house today for under 64K? 
B.W. Behling will let you do it on the Commodore 
64. In fact, he'll let you build a whole block of 
them, as you manage money, materials, and work- 
ers in a race to meet your deadline. This exciting 
simulation is the next best thing to owning your 
own Construction Co.! (Turn to page 58.) 

Fans of Bob Lloret's graphics: the programmer of 
Post Time and Air Assault has outdone himself! But 
don't stare too long at the scrolling, star-filled back- 
ground of Space Patrol...the evil Captain Microz 
has no appreciation for art! (Turn to page 95.) 

If you're at the stage where you consider punching in 
other people's programs beneath you, try this month's 
installment of Creating Your Own Games on the VIC 
and 64. Orson Scott Card focuses this time on generating 
fast graphics with custom character sets. (Turn to page 47.) 

Dale Rupert examines the details of program stor- 
age by Diving into BASIC deeper than you've ever 
gone! (Turn to page 86.) When you come up for 
air, try Dale's Commodares. (Turn to page 55.) 

As always, our reviewers call 'em as they see 'em 
with regard to releases like Trivia Fever, Write 
Now!, Cell Defense, Mirage's Database Manager, 
and Gridtrap. (Turn to page 35.) Scuttlebutt fills 
you in on the most recently announced products for 
64 and VIC users, including new printer interfaces, 
Biblical software, and a host of new games from 
companies like Activision, Infocom, Victory, 
HesWare, and Creative Software. (Turn to page 6.) 

If you missed our last issue, please note: 

1) We've begun utilizing a new method of printing 
our program listings. Read page 61 of this issue 
carefully before entering any programs! 

2) The Ahoy! Bulletin Board is open 24 hours a 
day, 7 days a week. If you have a 64 or VIC and a 
modem, call 212-564-7727 to download files provid- 
ing information on upcoming issues, excerpts from 
future editions of Scuttlebutt, and more. 

3) The programs in each month's issue of Ahoy! 
can now be purchased on disk. See page 66. 

Computer magazines seldom make room for senti- 
ment—most, if they did, would wind up bumping it 
for a quarter-page ad. But the relationship between 
Ahoy! and its readers has always been different. We 
feel as if we know you all from your letters, irate 
phone calls with programming problems, and now 
our BBS. That's why we feel that we're talking to 
close friends when we wish you the best of the holi- 
day season. Please join us again in January, when 
we begin our second year of growing together in 
programming knowledge. — David Allikas 


Sue Ellen needs help. 
She's fed up with Ј.К.5 no- 
good tricks. Danger, 
intrigue and the smell of 
big bucks are in the air. 

What's going on? 

It's up to you to find 
out. You're the detective 
in a mysterious game that 
takes you from Southfork 
to the steamy jungles of 
South America, 

If you figure out all the 
clues and find a secret oil 
field, Sue Ellen will be 

glad. J.R. will be mad. 

And you'll be two 

million dollars richer. 

The Dallas Quest. An 
interactive Adventure 
game from Datasoft. 
For Commodore 64, 
Apple 1! series, Atari and 
IBM PC & PC/JR systems. 


Datasoft, Inc, 19808 Nordhoff Place, 
Chatsworth, CA 91311 - Phone (818) 701-5161 


SCUTTLEBUTT 


ANTENNA REDUCER * COMAL PAK % PLUS/4 SOFTWARE * DISK DRIVE 
AND PERIPHERALS FANS * VOICE MODULE * PRINTER INTERFACES * 
TERMINAL GRAPHICS * I5-UTILITY DISK е MEMBRANE KEYBOARD * 
BIBLICAL SOFTWARE * GAMES FROM ACTIVISION, INFOCOM, CREATIVE 


Looking for a holiday gift for 
a Commodore owner (like your- 
self)? Scuttlebutt is a great place 
to browse. One warning though: 
if you plan to order by mail, 
check with the company first. 
Some won't accept mail orders. 
Some won't deliver in time for 
Christmas. And some products 
reported on in Scuttlebutt may 
not be available yet. 


MUSICAL KEYBOARD 

Waveform's ColorTone Key- 
board, previewed last issue in 
Playing the Commodore 64, has 
been relea The touch-sensitive 
membrane includes 25 keys, а 
touch strip (played like a һагр), 
and 14 function keys. The user 
can choose from among eight dif- 
ferent instruments, and play along 
with 12 different background 
songs in one of 12 scales. 

The keyboard runs on the 64, 
independently, with its included 
software, or with Waveform's 
MusiCalc 1. Retail price is 
$79.95. 

Waveform Corporation, 1912 
Bonita Way, Berkeley, CA 94704 
(phone: 415-841-9866). 


INTERFACE FACTS 

Next month, Morton Kevelson 
continues Printer Interfacing Re- 
visited with a look at several 
available choices. Released too 
late to be included are the follow- 
ing pair from Omnitronix: 

The Deluxe RS232 Interface 
provides VIC, 64, and SX64 us- 
ers with all RS232 signals includ- 
ing ring detect. Three switches 
select for DTE/DCE, pin 5 or pin 
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Two-octave ColorTone Keyboard lets beginners play in correct key and tempo. 


READE!) 


VIC) 


10 


20 handshaking, and BUSY line 
polarity, eliminating the need for 
rewiring. When supplied with a 
PCB mounting Female DB25, the 
unit can substitute for the Com- 
modore 1011A. Price is $39.95. 

The Parallel Printer Interface 
and its driver software allow VIC 
and 64 users to print Commodore 
graphics and control codes on 
practically any dot matrix printer 
with bit map graphics capability 
(on printers without, the graphics 
and codes translate into mnemon- 
ics ог СНК codes). Also 
$39.95. 

Omnitronix Incorporated, P.O. 
Box 43, Mercer Island, WA 
98040 (phone: 206-236-2983). 

Seeking a stronger toe hold in 
the interface arena is the Grappler 
CD, its price having been low- 
ered by Orange Micro from 
$139.00 to $119.00. The interface 
offers four operating modes, 
built-in screen dump commands, 
and the ability to render graphics 


characters on a number of print- 
ers. Also available are text mode 
(for word processing), program 
listing mode (for transition of 
control commands), and transpar- 
ent mode (for access to special 
printer features). 

Orange Micro Inc., 1400 М. 
Lakeview Ave., Anaheim, CA 
92807 (phone: 714-779-2772). 


Has many text formatting features. 
READER SERVICE NO. 11 
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HAS MR. ОО CLOWNED AROUND 
ONCE TOO OFTEN? 


Mr. Do laughed in the 
face of disaster at the 
arcades. Now he's ready 
to clown around at 
home. It might be his 
last laugh if you're not 
careful. Just like the arcade 
game, monsters and 
their henchmen are out 
to do in Mr. Do. And it's 
up to you to try and fend 
them off with a powerball 
апа goodies galore. 

If you can, squash the 
monsters with huge 
apples. Or knock them 
dead with your trusty 
powerball. Slow down the 
henchmen with cherries. 
And try to escape through 
amaze of tunnels on 99 
different screens. 

Now do you have what it 
takes to keep Mr. Do from 
being done in? 

For Commodore 64, 
Apple Il series, Atari and 
IBM PC & PC/JR systems. 


LL Datasoft, Inc., 19808 Nordhoff Place, 
cov mined. Chatsworth, CA 91311 - Phone (818) 701-5161 
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Flight b 
Simulator II 


Visa accepted. 
Order Line: 800 / 637-4983 


Reader Service No. 55 


'www.oldgamesitalia.net/ http://www.oldgamesitalia.net/ 


JAZZED UP 

Entech's Studio 64 has been en- 
hanced to include hi-res graphics, 
truer musical notation including 
tied notes, sharps, and flats, and 
12 sample songs including Billie 
Jean and Sweet Dreams. 

С-64 disk is $39.95, or mail 
your old disk plus $10 to EnTech 
Software, P.O. Box 185, Sun 
Valley, CA 91353 (phone: 818- 
768-6646). 


ML TERMINAL 
GRAPHICS 

Because no BASIC program for 
transmitting data to graphics 
terminals can keep up with a 300 
baud rate, Graph-Term 64 is writ- 
ten in 100% machine language 
The program lets the user view 
Tektronix format plots generated 
by a mainframe computer, down- 
load text or plot files, generate 
plot files on the 64, preview plots 


LEROY'S CHEATSHEET’ 


KEYBOARD OVERLAYS. 


LEROY’S CHEATSHEETS 


functions facilitate voice and clef changes. 
SERVICE NO. 12 


on the hi-res screen, and create 
hard copies of the plots on the 
Commodore 1520 plotter. 

$49.95 plus $4.00 shipping 
from Bennett Software Company, 
3465 Yellowstone Drive, Ann 
Arbor, MI 48105. 


LOADED DISK 

So what if you never use some 
of the 15 utilities found on Ap- 
plied Technologies’ Bits and 
Pieces disk? In these days of 
bloated software prices, mere sat- 
isfaction at getting the programs 
for $2.00 ($29.95 + 15) each 
should make their purchase 
worthwhile 

Various programs allow 64 us- 
ers to check for errors on a 
whole disk or by track and sec- 
nine the contents of a 
„ a file, or the disk direc- 
tory, transfer files in various 
ways, create sprites, and more. 

Applied Technologies, Inc., 
Computer Products Division, 
Lyndon Way, Kittery, Maine 
03904 (phone: 207-439-5074). 


AS THE CROW FILES 

At first we figured that Audio- 
genic, Ltd. of England had titled 
their new database manager Mag- 


pie because all the good names 

п. Then we remembered 
pie" can mean a collec- 
tor of odds and ends. Get it? 

23 pop-up menus provide forms 
design, peripheral control and 
programmed applications, and use 
of dual drives and enhanced print- 
ers. Record size runs from 25 to 
6100 characters, with 26 alpha 
and 26 variable fields. Disk (for 
applications use) is $64.95; car- 
tridge (for user-programmed solu- 
tions) is $99.95. 

Audiogenic, Ltd., c/o Regenics, 
Inc., P.O. Box 767, Orange, CA 
92666 (phone: 714-639-9396). 


PLUS/4 PLUS 64 

C-64 users thinking of stepping 
up eventually to the Plus/4, keep 
your fingers crossed that other 
software manufacturers follow the 
precedent set by Tri Micro. The 
developers of the Plus/4's i 
grated software have begun re- 
leasing utility programs on two- 
sided disks: one side for the 
Plus/4, one for the 64. 

Plus Graph enhances the graph- 
ics capabilities of the Plus/4, gen- 
erating hi-res graphs prepared 
within the computer's spreadsheet 
or database. The 64 version 
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ut! Telecommunications! 
nmodore! id 


aphics 
tem! Interrupt Music Maker/Editor! A 
Peck at Memory! Sequential Files! 


#5—MAY 784 $4.00 

‘of Commodore! Inside BASIC 

mory management on the 

1 And ready 

to enter: Math Master! Air Assault! 
Biorhythms! VIC Calculator! 


1880 


OR SEPT. 784 $4.00 


со RAM! And ready 
Diver! DOS! Sound Explorer! С; 
of Darkness! Base Conversions! 


Try this experi 


ISSUE #2—FEB. 784 yee 


Illustrated tour of the 1541! Arti 
intelligence! Synapse’s Ihor Wolosenko 
interviewed! And ready to enter: Music 


CANT PROGRAM? ITS ALL м YOUR WEAD 


UE #6—JUNE 784 $4.00 
Game programming column begins! 
Program generators! Rupert on input- 
ting! Memory management continues! 
And ready to enter: Post Time for the 
64 & VIC! Alpiner! Sound Concept! 


SUE #10—OCT. "84 $4.00 
-64 Graphics programs! Bit- mapped 


Lawn Job! 


phant of Cipangi 


INE KIDS A 
TUIS n емі: 


ISSUE #3—MAR, '84 5400 


Anatomy of the 64! Printer interfac- 


ter: Address Book! Space Lanes! Ran- 
dom Files on the 64! Dynamic Power! 


ISSUE 47— JULY '84 $4.00 
MSD Dual Disk! Database buyer's 
guide! Training your curso 
displays! File Sleuth! Users Groups! 
1o enter: Renumbering! 
ender! Brisk! 


ОУ. "84 $4.00 
keyboards for the 
ш Graphics feature continues! And 
ready to enter: PTE word processor! 
Block Editor! Alternate Character Set 
for the 64! Tunnel of Tomachon! 


#4—APR. 784 $4.00 
Petspeed and Easy Script tutorials! 
Printer interfacing continues! Laser- 

dy to enter: Apple Pie! 
1 Name that Star! Low- 
er case descenders on the 1525! 


ISSUE /8—AUG. 784 $4.00 
Choosing a word processor! Compu- 
tational wizardry! Creating your own. 
‘word games! Sound on the 64! And 
ready to enter: Micro-Minder! Direc- 
tory Assistance! Terrible Twins! 


1f you have a modem and 
want more complete infor- 
mation on any of the issues 


listed, call the Ahoy! Bulletin 


Board: 212-564-7727. 


ent! Flip through any issue of Ahoy! that you've finished reading. Add up the hours of programming 


toil our feature articles and tutorials saved you—the hours of shopping our expansive news section saved you—and the money 
our unbiased reviews saved you—and see if the magazine didn’t pay for itself? Then ask yourself: can you afford to be with- 
out a single time- and money-saving back issue? 

If you're serious about programming, you can't be serious about continuing without a complete collection of Ahoy! 


г"--------------------......-..... 


Money Order for S. 


(Outside the USA please 
add $1.00 for every copy) 


ee Please Send Me The Following: NAME 
iil >. = f 
Е = 
ternational Inc., 45 West Ё Se, Enclosed Please Find My Check o 
34th Street— Suite 407, New |8 mmm Қы Une eae CITY: 


York, NY 10001. 


works with Tri Micro's The Write 
File (integrated word processor 
and database) and Your Home Of- 
fice (integrated word processor 
and spreadsheet). 

Your Personal Accountant keeps 
track of cash and several bank ac- 
counts, providing 21 categories 
for expenses. No knowledge of 
bookkeeping is required. 

Tri Micro, 1010 N. Batavia, 
Suite G, Orange, CA 92667 
(phone: 714-771-4038). 


COMMODORE JAMES 
VERSION 

With the proliferation of Bibli- 
cal software for the C-64, the 
Gideons may soon start placing 
floppy s in hotel room 
drawers. 

Knowledge Bible lets 2-10 play- 
ers compete to answer questions 
on the King James Bible. The 
$39.95 disk contains 500 ques- 


tions; additional 500-question 
disks $19.95. 

Little David Enterprises, PO. 
Box 91, Fairless Hills, PA 19030 
(phone: 215-943-0770). 

Scrambled Verses, one of two 
from Smoky Mountain Software, 
provides Scriptural text on various 
Christian subjects, in random or- 
der. To the accompaniment of hi- 
res pictures and familiar hymns, 
the player must rearrange the text 
properly. Disk; $19.95. 

Sort Ет 1: Creation, The 
Flood, Baby Moses displays story 
pictures of those Old Testament 
episodes, then shuffles the pic- 
tures and requires players aged 5 
to adult to put them in order. 
Also disk, $19.95. 

Smoky Mountain Software, 13 
Catatoga Path, Brevard, NC 28712 
(phone: 704-885-2516). 

Of course, Davka Corporation, 
patriarchs of religious software, 


are still at it. Their latest, Search, 
simulates a trip to and through the 
Holy Land by challenging 1-4 
players (age 8 to adult) to locate 
their cousin Sara's house in one of 
s in Israel, using maps 
and various clues. Sara's location 
changes each time you play. On 
disk; $24.95. 

Davka Corporation, 845 North 
Michigan Avenue, Suite 843, Chi- 
cago, IL 60611 (phone: in IL 312- 
944-4070; rest of USA 1-800- 
621-8227). 


SWAHILI SPOKEN HERE 
They laughed at talking pictures 
in the beginning. Don't make the 
same mistake with talking compu- 
ters. Voice modules for the C-64 
are growing in number and capa- 
bility. One of the more recent 
(and capable) is Chirpee from 
Eng Manufacturing. This $179.95 
peripheral allows users to perform 


FINALLY, YOUR COMPUTER 
CAN DO WHAT YOU TELL IT. 


Now anyone 
can use 
a computer. 


Revolutionary Chirpee " lets you command 
your computer by voice. 


Why touch your computer when you can talk 
to it. Chirpee, the most exciting peripheral 
development ofthe decade, makes it easy 
and completely affordable for you to turn 
your computer into the full-function tool it was 
intended to be. Thanks to a revolutionary 
phonetic-based design, you can train Chirpee 
in any language to understand your voice or 
several voices. Use Chirpee’s demonstration 
software to create your own programs with 
voice commands. Free your hands and your 
mind. You'll have more time to think, more time 
to program. 


Suggested Retail *179** 


Chirpee adds a whole new dimension to. 
your computer. Its the one peripheral that can 
make your system truly friendly. 


Instruction book, plus 6 comprehensive. 
disk software programs included. More 
being developed by major software 
manufacturers. 

[3 SOS— Speech Operating System con- 
tains all training, use and file handling 
routines needed to generate basic 
Chirpee system 

О CHIRPEE—the heart of ай functional 
software applications. Allows everybody 
to use Chirpee for software applications. 

C] SPEECH GRAPHICS—displays each 
phonetic utterance on colorful X-Y plot 


Now everyone 
will use their 
computer more. 


[O AERONAUT—exciting game allows 
participants to drive hot-air balloon over 
mountainous terrain with five command 


words 
[CARD FILE—personal filing system for 
home or business programs. Allows 
storage, recall or printing of typed memos 
[2 WORD MIX—a word matching game 
that shows beginning programmers how 
Chirpee is used in a BASIC program 


RRS 
ENG MFG., INC. ARES. 
4304 W. Saturn Way (2) < 
Chandler, AZ 85224 | 


Phone 602/961-0165 


Ss, 


Call toll-free 1-800-431-3331 or 602-431-0400 for dealer location nearest you. 
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FLIGHT “SIMULATOR GA GAMES 
yt COCKPIT 64 


For the Commodore 64 
100% Machine Language 


Windshield View 
$30. 


* 7 Airports 
595 


Runway 90 (VIC-20 16K) $25 
Sky Pilot (VIC-20 8K) $18 


ADD $2° FOR DISK VERSION 
BAR GRAPH 64 


FOR THE COMMODORE 64 


100% Me e 
Full Color Display 
Saves To Disk * $30. 
SEND 1.00 FOR CATALOG 
COD ORDER PHONE 


WE SHIP WITHIN 48 HOURS 


(312) 577-5154 


(s GsSUSIE 874 Ea. Northwest Hwy. 
(SOFTWARE М. Prospect, IL 60056 


Runway 64 (Commodore 64) 
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JUMPIN' JACK 
GRIDTRAP 
TRIAD 


$ s2935 


tape or disc 


TO ORDER ONLY: Call Collect, 


(315) 475-2224 Ext. 233 


‘Add $2.00 for handling, М.Х residents add 7% 
tax. СОО з add additional $2 00. We accept 
MC/VISA, checks, money orders or COD. 


DEALERS & DISTRIBUTORS PLEASE 
WRITE FOR MORE INFORMATION, 
38 IMPORT and EXPORT 


PORATION 
731 James St 9405, Syracuse. NY 19203 
Tet (915) 475-2224 Teien 706724 


Reader Service No. 33 
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a variety of functions via spoken 
words—in any language on earth, 
thanks to its phonetic feature ba- 
sis. АП utilities to train, recog- 
nize, and store voice files are in- 
cluded and can be copied or in- 
serted into other programs. 

Eng Manufacturing, Inc., 4304 
W. Saturn Way, Chandler, AZ 
85224 (phone: 602-961-0165). 


OFF THE RAK 

RAK's Antenna Reducer will 
design an antenna 30-100% of 
full size on your 64. You select 
the frequency range (.5 to 
15МН2) and loading coil diame- 
ter; the program then calculates 
the antenna measurements and 
graphically displays the antenna 
design. $7.95 on tape, $10.95 on 
disk, plus $2.00 shipping. 

Also from RAK is C-64 Lil’ 
Ledger, allowing the small busi- 
nessman up to 500 entries in 15 
expense and income categories. 
On disk; $12.95 plus $2.00 
shipping. 

RAK Electronics, P.O. Box 
1585, Orange Park, FL 32067 
(phone: 904-264-6777). 


BIGGEST THING SINCE 
ESPERANTO? 

COMAL, which combines 
some of the best features of lan- 
guages like LOGO, MODULA, 
PASCAL, and ADA in an easy- 
to-use format, has crossed the At- 
lantic. The same COMAL 2.0 
cartridge that Commodore is 
selling in Europe will be distrib- 
uted here by the Comal Users 
Group, U.S.A., as will the disk- 
loaded COMAL 0.14. 

Pay attention, now: you can 
have, for $19.95, the Enhanced 
COMAL Pak (COMAL 0.14, 2 
disks, and reference card); for 
$29.95, the COMAL Starter Kit 
(adds a book, a third disk, and a 
case); or for $99.95, the COMAL 
2.0 Cartridge Package (2 books, 


2 disks, and the cartridge in a 
custom molded case). For a 
stamped and self-addressed envel- 
Ope you can get a free COMAL 
Info Pak. 

COMAL Users Group, U.S.A., 
Ltd., 5501 Groveland Ter., Mad- 
ison, WI 53716 (phone: 608- 
222-4432). 

The Toronto Pet Users Group 
(ТРИО) has published a 50-page 
COMAL programming manual 
written by one of the language's 
creators. Price is $9.95. 

TPUG Inc., 1912A Avenue 
Road, Suite #1, Toronto, Ontario, 
Canada MSM 4AI (phone: 416- 
782-9252). 


COOL IT 

Does your disk drive tend to be 
à hot head? Maybe Com-Cool 
($54.95) or Com-Cool Plus 
($79.95) can cool it down a little 
bit. These fans sit atop your 1541 
and pipe air through the ventilat- 
ion ducts on top of the unit. With 
the addition of a special bracket 
two stacked 15417 can be cooled 
off. Both units have an air filter 
1o insure that no dirt is blown in- 
to your drive. Com-Cool Plus 
provides a surge protector and 
two additional sockets to protect 
your entire computer system from 
power surges. 

City Software, 735 West 
Wisconsin Ave.—Suite 1010, 
Milwaukee, WI 53233 (phone: 
414-291-5125). 

If you have a vacant area mea- 
suring 2" by 3.3" by 1.12" inside 
your printer, monitor, or other 
peripheral, you can install a Bee 
Fan. Its two bending piezoceram- 
іс mylar blades flap like a bee's 
wings, using 1/15 the power of 
rotary fans, or 0.11 of a watt at 
120 VAC. 

$24.95 plus $3.00 shipping 
from Atmospheres, 1207 Eighth 
Avenue, Brooklyn, NY 11215 
(phone: 718-788-6799). 


Mimic introduces instant evolution! 
Meet the Spartan™— the missing link 
that turns your Commodore 64™ 
into a whole new apple. 
The Spartan™ now allows you to use 
any of the Apple" II/II+ hardware 
and software you want. 
Now, that's natural selection! 
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FOR INFORMATION 
PLEASE WRITE TO 
MIMIC SYSTEMS INC. 
1112 FORT ST., FL. óF 
VICTORIA, В.С. 
CANADA УВУ 4V2 
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NEW GAMES UPDATE 

By the time you read this, we're 
confident that the only people still 
moonwalking will be doing it on 
green cheese. But Creative Soft- 
ware hopes their Break Street will 
succeed despite the ephemeral na- 
ture of fads. 


Take a moonwalk down Break Street. 
READER SERVICE NO. 14 


Guiding your dancer through 
head spins, snaking, the tut, and 
other gyrations, you must avoid 


missing a key sequence. That will 
cause you to fall and the action to 
be turned over to the Stingrays, 
the neighborhood gang you're 
dancing against. You may string 
together and save your favorite 
dance sequences. On C-64 disk; 
$24.95. 


Fire Ant:an adventure/arcade mix. 
READER SERVICE NO. 15 


Creative Software, 230 East 
Caribbean Drive, Sunnyvale, CA 
94089 (phone: 408-745-1655) 


Fire Ant, one of two for the 64 
from Victory Software, is an ad- 
venture game incorporating joy- 
stick-controlled arcade action, 
eight different screens, and a 
number of puzzles in need of 
solving. 

Zeta-7 is а 3D space battle that 


The 3D view from Zeta-7's gunport. 
READER SERVICE NO. 16 


you view through a gunport as 
alien ships zoom in from space. 
Continued on page 96 
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EVERYTHING YOU EVER WANTED IN A DISK UTILITY . .. AND MORE!! 
FOR THE COMMODORE 64* 


* 
* 
* 
* 
* 
ж 
ж 
ж 
ж 
ж 


Format a disk in ten seconds 
Remove errors fram-any track/sector. 

Edit sectors їп HEX, ASCII — even assembler. 
Create errors on any track/sector [20, 21, 22, 23, 27, 29] instantly. 
Drive/64. MON, even lets you write programs inside your 1541 
All features are fully documented and easy to use 

None of our copy routines ever makes the drive head "kick." 
Yes, you get all of this on one disk for this low price! 


Fully automatic back-up of almost any protected disk. 
Copy files [PRG, SEG, RND] with full screen editing: 
Three minute back-up of standard disks [even many protected disks] 
* View and alter sector headers. 


. Continuing Customer Support and Update Policy 


ST/«RPO 
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WRITE OR PHONE 


Gazelle, CA 86034 


Reader Service No. 38 


INT SOFTWARE 


[815] 4352371 


Аі orders add $2.00 shipping/ handling, 

Catone: residents әді: 6% sles ta 

(COD orders add an a'l $3.00 shipping. 

Check, Money Order VISA. and Mastar 
card accepted 
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PRIMER ON 
PRINTERS 


Photos and Text 
By Tom Benford 


ne of the major peripherals you'll pur- 

chase for your home computer system is 

a line printer. Not only is a line printer 

a highly productive peripheral, it's an ex- 
pensive one, often costing more than the combined 
price of the computer and disk drive. So before you 
lay out your hard-earned cash, it's a good idea to 
understand what you should look for in the way of 
features to get the most value for your money. This 
article will provide you with enough information on 
printers to make you an "educated consumer" and 
insure that you'll get a printer that's right for your 
needs. There are four major types of line printers: 
dot matrix, letter quality or daisy wheel, thermal, 
and ink-jet. 

Thermal printers utilize a special paper which is 
heat-sensitive. The print head has wires to form the 
cl ters, similar to a dot matrix printer, but in- 
Stead of striking a ribbon, the wires in the thermal 
printer heat up and burn off the coating of the spe- 
cial paper. The only advantages of thermal printers 
are that they're almost silent, and relatively inexpen- 
sive. The disadvantages, however, far outweigh these 
dubious pluses: the specially coated thermal paper is 
more expensive than plain paper, it is extremely fra- 
gile, and it deteriorates over a period of time due to 
atmospheric and climate conditions. This makes 
thermal printers highly undesirable for applications 
where any kind of permanence is desired. 

The last of these types, the ink-jet printer, is the 
product of relatively new technology compared to the 
former three types, and at this point in time the va- 
riety and cost of such units is beyond the scope of 
this article; we will, however, cover ink-jet printers 
and color printer/plotters in a subsequent feature in 
Ahoy! For now, we'll concentrate on the dot matrix 
and letter quality printers. 


The MPS-801 offers economical 

dot matrix printing; the Gemini 15Х offers greater ver- 

satility at a higher price. See chart on page 18. 
MPS-801: READER SERVICE NO. 1 


GEMINI 15Х: READER SERVICE NO. 2 


'w.oldgam: 
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DOT MATRIX v. LETTER QUALITY: 
THE DIFFERENCES 

The major difference between these two genres is 
the way in which they produce printed characters. It 
is from this difference that their ication and 
naming derive. 


The Cardco 

LQ-2 utilizes a rotating character drum, unlike most let- 

ter quality printers (including the LQ-3—bottom). 
LQ-2: READER SERVICE NO. 3 


LQ-3: READER SERVICE NO. 4 


In the dot matrix variety, the printed characters are 
comprised of little dots which form the alphanumeric 
and graphic characters. These dots are produced by 
groupings of little wires which form the designated 
character and strike the ribbon to leave the imprint 
of the character on the paper. One important asset of 
dot matrix printers is the ability to produce virtually 
any character, provided the coding is correct; being 
able to produce the entire graphics character set of 
Commodore computers is but one example of this 
flexibility of character configuration. As with just 
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about everything else in life, there are compromis 
and to get this ability, you'll have to give a little 
far as readability and character formation go. 
The number of dots which are available to com- 
prise the image matrix determines the quality and 
formation of the characters; the more dots, the bet- 
ter. Often in low-resolution printers, the shapes of 
characters will be poorly defined and characters with 
descenders, such as “р”, р”, “q”, and "y" will 
look as if they are slightly elevated from the other 
“ or descender 
eline as it should. A 5x7 


doesn't dip below the 
dot matrix offers lower resolution and print quality 


than a 7x9 dot matrix. In these examples, the 5x7 
matrix has five horizontal rows of dots and 7 vertical 
rows, yielding a total of 35 (maximum) dots with 
which to make up the characters, On the other hand, 
the 7x9 matrix yields 63 dots maximum total, or al- 
most twice as many as the 5x7 matrix. Obviously, 
you can produce much better character definition and 
have the descenders formed and positioned correctly 
when you have this many dots to work with, The 
old adage “bigger is better” holds true here, with a 
bigger number of dots in the matrix being a highly 
desirable feature. Another adage, “better is more сх- 
pensive,” also holds true; high-resolution printers 
cost more than low-resolution models. 

Conversely, letter quality printers have true corre- 
spondence-quality output, often rivaling or exceeding 
the output of the best office typewriters. The daisy 
wheel is by far the most widely used print mechan- 
ism on letter quality printers, although some printers 
(such as the Cardco LQ-2) utilize rotating drums on 
which the character matrices are molded, The name 
daisy wheel comes from the 
vice which produces the characters. I 
fair with “spokes” radiating out from its hub. On the 
ends of these “spokes” or “petals” are the individual 
alphanumeric and punctuation characters that you 
print from. Overall, it looks somewhat like a daisy, 
hence the name daisy wheel. 

Another difference between the two types of print- 
ers is the inking media with which they print. Dot 
matrix printers usually (but not always) use cloth 
ribbons impregnated with ink that can often produce 
hundreds of thousands of characters before they need 
replacing. They accomplish this by rotating fully in 
one direction, then reversing direction and reusing 
the ribbon on the second and subsequent passes. 

The daisy wheel or letter quality printer, on the 
other hand, almost always uses a single-pass mylar 
ribbon cartridge which must be replaced once it is 


. fully used up. These ribbon cartridges have a much 
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shorter useful life than the traditional two-spool cloth 
ribbons, and they cost considerably more. What do 
you get for the extra expense? Superb print quality 
that looks as good as or better than the output of an 
IBM Selectric typewriter. 

Print speed is another consideration when contem- 
plating a printer, Dot matrix printers are usually 
quite fast, with some models exceeding 150 charac- 
ters per second (cps). Letter quality printers, for the 
most part, are much slower, but on in, the 
print quality is much better. It should be noted, 
however, that there are some high-speed letter qual- 
ity printers available as well, such as the Diablo 
630, but now we're in the $2,000 price range, which 
is getting away from the main point of this article 
how to get the most printer for the least amount of 
money. 


BI-DIRECTIONAL PRINTING 

Bi-directional printing is a highly desirable feature 
to have in a printer, whether it is dot matrix or letter 
quality. Bi-directional printing simply means that the 
print head is active when traveling in both directions 
across the paper, rather than mono-directional. The 
best illustration of mono-directional printing is the 
ordinary typewriter. The carriage travels from the 
left edge of the paper to the right, then travels back 
without printing when the return key is pressed. A 
bi-directional printer prints from left to right, then 
the next line is printed from right to left, so the 
turn trip is not wasted. The big advantage of bi-d 
rectional printing is speed—about double that of a 
mono-directional printer. 

Logic-seeking bi-directional printing is even better, 
since the printer “looks ahead” in the text to see 
where the next line will end in advance. By knowing 
in advance where one line ends and the next one be- 
gins, the printer is able to move the print head about 
very fast from one line to the next and another in- 
crease in speed is made possible. Bi-directional 
printers without logic-seeking circuitry print out a 
line, then travel all the way to the margin before 
they start to print on the next line. There's a lot of 
wasted travel here, and this is non-productive time. 
Not only does it slow things down quite a bit, it 
puts extra wear on the moving parts of the printer, 


CARRIAGE WIDTH 

Your intended use for the printer will be the deter- 
mining factor of how wide a carriage you need. If 
you plan to print out spreadsheets, for example. 
you'll need a printer with 132-column or better capa- 
bility, so you'll need a 15" carriage. On the other 


hand, if you intend to use the printer primarily for 
printing out program listings, carrying on correspon- 
dence with a word processing program, etc., you'll 
probably do nicely with a 9" carriage machine. Cost 
goes up as the carriage width increases, but it may 
be a good idea to spend the extra money and get a 
printer with a wide carriage—you may need it even- 
tually. A wide-carriage printer can handle narrower 
paper as well, but a narrow-carriage printer can't 
handle wide paper. In the future, you may need that 
extra carriage width, and you won't have to go ош 
and buy another printer to get it! 


FRICTION OR TRACTOR FEED 

Friction, as you know, literally means two objects 
rubbing together. In a line printer with friction feed, 
the paper is forced against the platen roller by a. 
pinch roller which causes friction. When the platen 
roller is rotated, this friction causes the paper to 
travel with it, and the paper is advanced a la fric- 
tion, hence the term, A really big plus of friction 
feed is that it allows you to use single sheets of pa- 
per, such as letterhead stock, or continuous-roll pa- 
per with equal ease. If the carriage is wide enough, 
you can even run form-feed tractor paper if you wish. 

Cut-sheet feeders are often available on letter qual- 
ity printers, but they are sometimes offered as op- 
tional accessories on dot matrix units as well. A сш- 
sheet feeder is a hopperlike affair that automatically 
feeds sheets of cut paper (i.e., letterhead or postcard 
stock) into the printer. It’s a handy device for print- 
ing personalized form letters, but often the price of a 
cut-sheet feeder rivals that of the printer itself ! They 
do offer enhanced speed in printing such material, 
but you must decide if the extra money involved is 
worth the increase in speed, and how much of this 
sort of printing you intend to do should be the de- 
ciding factor here. 

Tractor feed, as the name implies, utilizes the 
hole-and-sprocket principle. much like the treads of 
a tank or the chain drive of old agricultural tractors. 
The paper has two perforated “tracks” or shoulders 
опе at each end, with holes in it, spaced at even іп- 
tervals, The "tractor" section of the printer consists 
of two gear-driven sprockets with “teeth” or small 
spikes on them. The idea here is that the teeth or 
spikes engage in the holes on the shoulder of the pa- 
per, and pull it through as the sprockets rotate. The 
paper has perforations which allow you to tear off 
the shoulders when printing is completed. Tractor 
feed is very widely used on printers, and those 
printers offering friction feed as standard equipment 

Continued on page 92 
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What you get if you cross 
aCommodore 64 with a Ferrari. 


NY get the incredible And, you getthe only diskdrive ^ LED display that keeps you in 
) 6 Indus GT" disk drive. that comes with free software. control of your Commodore to 
You get brains. You get beauty. Word processing. Spreadsheet the air-piston operated dust 
But, that's not all you get. Database manager. Plus, a carry- cover that protects your disks 

You get a disk drive that can ing case that doubles as an 80 and drive 
handle 100% of Commodore's disk storage file So, you know what you really 
software. 400° ter. Most of all, you get luxury. get if you cross a 
You get the disk drive with the From the sleek lines of its sound- Commodore 64 
best service record around. With proofed chassis to the respon- with a Ferrari? 
aone year warranty on partsand sive AccuTouch” controls at the You get the 
labor to prove it. Indus CommandPost™ From the best. 


Deering Avenue, Chatsworth, CA 91311 (8 


of Commodore Business Machines, T С 


Ferrari is a registered trademark of 


Reader Service No. 45 


t is nearly а year since we discussed the inter- 
facing of a non-Commodore printer to the 
VIC 20 or the Commodore 64 (see our 
March and April issues). Since that time a 
number of new and improved printer interfaces have 
been introduced. We will be taking a close look at 
just how these products perform in Part II of this 
feature in our February issue. 

The process of reviewing these interfaces, as well 
as the reader response to our first feature, indicated 
that printer expertise advanced in three steps: 

1) Learning the use of the Commodore 1525 or 
MPS-801 printer. 

2) Learning the features and capabilities of the 
interface. 

3) Learning how to use the features of your partic- 
ular printer. 

The last two steps are dependent on the particular 
hardware you have purchased. There are too many of 
these devices for us to go into any great detail for 
each one. However, the reviews next month should 
give you some insight into the use of the various 
printer interfaces. 

We can offer two bits of advice. First, very care- 
fully read the manual supplied with the equipment. 
We have found that all the information you will 
need is in these manuals, although it may not a 
ways be obvious. Second, this tutorial on the 15. 
printer will be very useful. 

One of the primary tasks of the printer interface is 
to provide total emulation of the Commodore 1525 
printer. Thus a knowledge of how to use this printer 
is helpful. This is particularly important if you will 
be doing any of your own programming. Trying to 
drive a non-Commodore printer directly requires 
translation of Commodore ASCII to standard ASCII. 
We have found that the manuals which accompany 
the interfaces are very sketchy on how to use this 


The 1525 Printer- A Tutorial 
= 


BY MORTON KI LSON 


Commodore product. In addition, the owner of a 
non-Commodore printer may not have access to a 
Commodore printer manual. Many of the reader 
questions we have received can be directly traced to 
this lack of information. This tutorial will start you 
in the right direction. 


THE OPEN STATEMENT 

The computer communicates with all its peripher- 
als via a channel which fied by the OPEN 
statement. The syntax is as follows: 


OPEN fn,dv,sa 


Notice the three parameters which are associated 
with this statement. The firs ‚ is the file num- 
ber, sometimes referred to as the logical file number. 
This parameter is of interest only to the computer. 
All information which is transmitted to the printer is 
routed by the computer via this number. The file 
number сап be any value from 1 to 255, but you 
should use only numbers less than 128. Numbers 
greater than 127 have a special meaning to the com- 
puter. They will cause it to send an extra line feed 
with each carriage return. This has the effect of dou- 
ble spacing the text on the printer. 

The second number, “dv”, is the device number. 
This is solely determined by the design of the peri- 
pheral. Printers are usually device number 4, al- 
though 5 is generally possible. Device numbers 8 
and above are generally reserved for the disk drive. 
Other device numbers are 0 for the keyboard, 1 for 
the cassette deck, 2 for the RS232 port, and 3 for 
the screen. You must use the proper device number 
for your printer or interface. 

The third number, "sa", is the secondary address, 
sometimes referred to as the command. This is one 
of Commodore's ways of passing instructions to a 


This number сап range from 0 to 
255. The particular meaning or action performed by 
the secondary address is totally dependent on the 
particular hardware device. If it is omitted, a sec- 
ondary address of 0 will be assumed. 

There are only two possible secondary addresses 
which have any meaning to the 1525 printer, 0 and 
7. A secondary address of 0 sets the printer to “cur- 
sor up mode.” This means that any valid character 
data will be printed as either an upper case alphabet 
text, any of the numbers or standard punctuation 
symbols, or any of the Commodore graphic symbols 
which are accessed from the keyboard by pressing 
the shift key or the Commodore key. Lower case 
text will not be printed in this mode. 

The secondary address of 7 sets the printer to 
“cursor down mode.” This means that any valid char- 
acter data will be printed as either upper or lower 
case text, any of the numbers or standard punctua- 
tion symbols, or any of the Commodore graphic 
symbols which are accessed from the keyboard by 
pressing the Commodore key. The Commodore 
graphic symbols, which are accessed by pressing the 
shift key, will not be printed in this mode. 

These two secondary addresses actually have the 
same effect on the printer as the simultaneous press- 
ing of the Commodore and shift keys has on the 
screen display. 

The concept of secondary addresses is very impor- 
tant. Each of the printer interfaces we have seen 
makes extensive use of the secondary address values 
which are not used by the 1525 printer. This allows 
numerous additional printer functions and enhance- 
ments to be easily accessed by the user. 


THE PRINT? STATEMENT 

This statement is used to send text for printing. as 
well as additional commands, to both the printer and 
the interface. The syntax is: 


PRINT#£n, data 


The value for “fn” is the same file number which 
was used with the OPEN statement. Take careful 
note as to how this statement is entered. There 
should not be any spaces between the PRINT com- 
mand, the “#” symbol, the file number, and the trail- 
ing comma. This is not the same statement as would 
be used for PRINTing to the screen, although it 
serves the same function. It cannot be abbreviated 
with a “?” when writing a program. The actual ab- 
breviation is pR (the letter “р” followed by a shifted 
*r"). The file number and trailing comma still have 
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to be typed separately. | 

Aside from all this, the information which follows 
the statement is handled exactly the same way as for 
the screen PRINT statement. Thus, semicolons cause 
continuous printing and commas will tab ten spaces. 
As with the screen, both of these will also suppress 
the trailing carriage return. For example, 


OPEN1,4,7 
PRINT#1,"Hi","there" 
will print 

Hi there 


separated by eight spaces as shown. 


THE CHR$ FUNCTION 

The 1525 printer can be instructed to perform in 
several different modes. These are all accessed by 
sending the printer special codes via the PRINT# 
statement. This is similar to including screen control 
codes, such as a clear screen, in a PRINT state- 
ment. Since these codes are generally not printable 
characters, we have to use a special BASIC function 
to generate them. This is the СНЕ function. The 
syntax is: 


CHR$(i) 


Note the use of the parentheses. The value of "i" 
can be any integer between 0 and 255, or it can be 
any BASIC expression which evaluates to this range. 
The CHRS function converts the number within the 
parentheses to a data string which is exactly one byte 
long. Note that the value which results from a 
CHRS(I) is not the same as the number 1 or the 
BASIC string "I. Floating point numbers are actually 
represented by five data bytes. The string “I” is actu- 
ally equal to a CHR$(49). Actually, the various 
printable characters can be used instead of their 
ASCII codes if you find it more convenient. Many 
of the printer manuals will represent control codes 
as printable characters whenever possible. A com- 
plete table of Commodore ASCII codes is included 
in the manual supplied with your computer. 

The codes which the 1525 printer can understand 
are listed in the table on page 21. 

Let us take a quick look at each of these codes. 

The most simple are the CHRS(145) and CHRS(I7) 
codes. Actually, these perform the identical function 
as the secondary addresses of 0 and 7 described 
above. They allow the printer to be switched be- 
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TABLE ОЕ 1525 PRINTER 
COMMAND CODES 


FUNCTION 

Sets printer to graphic mode 

Sends a line feed without a carriage 
return. 

Carriage return 

Sets printer to double width characters 
Sets printer to standard width characters 
Moves printhead to the specified 
character or dot position 

Sets printer to cursor down mode 
Turns on reverse field printing 

Graphic repeat command 

CHR$(27) Used with СНВ8(16) to set dot position 
CHRS(I45) Sets printer to cursor up mode 
CHRS(146) Turns off reverse field printing 


CODE 
CHRS(8) 
CHRS(10) 


CHR$(13) 
CHR$(14) 
CHR$(15) 
CHR$(16) 


CHRS(7) 
CHRS(I8) 
CHRS(26) 


tween the two modes without closing and reopening 
the channel. They also allow the mixing of upper 
and lower case text with any of the Commodore 
graphic symbols on the same printed line. 

To obtain proper operation of the CHRS(I7) and 
CHRS(145) codes, the associated text must be sent 
with the same PRINT/ statement. After the PRINT# 
command is completed, the printer reverts back to 
the mode specified by the original OPEN statement. 
This will happen even if the program line is termin- 
ated with a comma or a semicolon. Technically 
speaking, the PRINT# command tells the printer to 
"listen? After the data is sent, the printer is “unlis- 
чепей” The following program demonstrates the 
proper use of these codes: 


10 
20 


open4,4 

print#4,"Ahoy! "; 

30 print#4,chr$(17);"Ahoy! "; 

40 print#4,chr$(14);chr$(17);"Aho 
y! ";chr$(145);"AHOY! ";chr$(17); 
"Ahoy! "; 

50 print#4,chr$(15);chr$(17);"Aho 
> 7% 

60 print#4,"Ahoy! " 

70 close4 


The listing is in upper/lower case mode to ргорег- 
ly display the use of the shifted characters. The 
CHRS(I4) code in line 40 causes double width print- 
ing. The printer will continue to print double width 
until the CHRS(I5) is sent in line 50. The program 
will print the name of our favorite Commodore mag- 
azine, seven times, on a single line, while demon- 


strating the upper/lower case to graphics mode 
changes. 


SETTING THE PRINT POSITION 

The СНВ8(16) code is similar to the BASIC TAB 
function. It has two modes of operation. When the 
printer is in text or character mode, the two bytes 
which follow immediately after will set the next 
print position to any of the 80 columns. The actual 
column number is sent as a two byte string or as the 
CHRS codes of the column number. For example: 


OPEN 4,4 


can be followed by 


PRINT£4,CHR$(16)CHR$(52)CHR$(56)" 
HELLO" 


or by 
PRINT£4,CHR$(16)"48HELLO" 


Either of these lines will print the word “HELLO” 
starting with the 48th column. Note that 52 and 56, 
in the first statement, are the ASCII codes of the 
digits *4" and “87. 

The following program uses the print position 
code to convert the name of our favorite magazine 
into a descending staircase motif. 


10 
20 
30 
40 
50 
60 


open4,4,7 

fori=0to4 
po$=right$("0"+str$(5*i),2) 
print#4,chr$(16)po$"Ahoy!" 
next i 

print#4,:close4 


SETTING THE DOT POSITION 

The 1525 printer is a dot matrix printer. It is cap- 
able of printing individual dots at any point on a 
page. There are a total of 480 dot positions on an 
eight inch line. If the CHR$(16) code is preceeded 
by a CHRS(27) code, then the printhead can be 
moved to any of these dot positions. As in text 
mode, the two following bytes determine the dot po- 
sition. Only this time, it is the actual byte value and 
not the ASCII code which is used. The first byte is 
either a 0 or a 1. If it is a 1, 256 is added to the 
second byte to calculate the position. For example: 


PRINT#4 , CHR$(27)CHR$(16)CHR$(1)CHR 
$(15) 


Continued on page 85 


COMPUTER AND SOFTWARE AUTO 4 
DIAL MODEM 6 


(Best communications package in USA) 


We 57900% 


Commovore 64 


(more power than Apple 1! at 1/3 the price) 


51880% о: 


ТНЕ 
* 170K Disk Drive 5249.00% BEST Mi LOWEST * Computer Learning Pad $49.00 
* Tractor Friction Printer 5169.00% SERVICE M PRICES * New Voice Synthesizer $59.00 


* Commodore 64 Power for 
Vic-20 $69.00 


ө 14" Hi-Res Color Monitor $219.00 Ж 
*less coupon discount 


SPECIAL SOFTWARE COUPON 


* SUPER AUTO DIAL MODEM $79.00 
* COMMODORE 64 COMPUTER $188.00 г ipit modore 64 сот 

в i We pack a SPECIAL SOFTWARE DISCOUNT 
COUPON with every COMMODORE 64 
COMPUTER DISK DRIVE-PRINTER 
MONITOR we sell! This coupon allows you 10 
SAVE OVER $500 OFF SALE PRICES 


1312900 SALE $79.00. 


NEW COMPUTER LEARNING PAD 549.00 


* 170 DISK DRIVE $249.00 (Examples) 
4 PROFESSIONAL SOFTWARE 


COMMODORE 64 


SALE $49.00 


NEW VOICE SYNTHESIZER $59.00 


ж 80 COLUMN 80CPS 
TRACTION FRICTION PRINTER $169.00 


COM-64 POWER FOR VIC-20 $69.00 


ж 14" HIRES COLOR MONITOR $219.00 


Write ог сай for 
Sample SPECIAL SOFTWARE COUPON! 


80 COLUMN BOARD $99.00 


EXECUTIVE QUALITY 
PROFESSIONAL BUSINESS SOFTWARE 


0 COLUMNS IN COLOR 
EXECUTIVE WORD PROCESSOR $49.00 


The Cadillac of Business Programs 
for Commodore 64 Computers 


12" GREEN OR AMBER MONITOR $99.00 


ЗБАЦЕ Coupon 


List $99 00 SALE $49.00 Coupon $39 ( 


LOWEST PRICE: 5 DAY FREE TRIAL * 90 DAY FREE REPLACEMENT WARRANTY 
BEST SERVICE IN U.S.A. * ONE DAY EXPRESS MAIL * OVER 500 PROGRAMS * FREE CATALOGS 


‘Add $10.00 for shipping, handling and insurance. Illinois residents 
please add 6" rox Add $20.00 for CANADA, PUERTO RICO. HAWAII 
ALASKA. АРО РРО orders. Canadian orders mus! be in U.S. dollars 
NOT EXPORT TO OTHER COUNTRIES. 
Enclose Coshiers Check, Money Order or Personal Check. Allow 14 ENTERPRIZES «enm 


days lor delivery. 2107 days for phone orders. 1 day express mail! 


VISA — MASTER CARD — C.O.D. BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 
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NEW 128K —MEGA BYTE DUAL DISK DRIVE-80 COLUMN 


COMPUTER SYSTEM SALE! 


HOME * BUSINESS е WORD PROCESSING 


LOOK AT ALL YOU GETFOR ONLY $$ ӨЗ. is ence 


(1) B128 COMMODORE 128K 80 COLUMN COMPUTER 5 995.00 
@ 4023 - 100 CPS - 80 COLUMN BIDIRECTIONAL PRINTER 499.00 
@ 8050 DUAL DISK DRIVE (over 1 million bytes) 1795.00 
@ 12" HI RESOLUTION 80 COLUMN MONITOR 249.00 
* BOX OF 10 LORAN LIFETIME GUARANTEED DISKS 49.95 
* 1100 SHEETS FANFOLD PAPER 19.95 
“ ALL CABLES NEEDED FOR INTERFACING 102.05 


TOTAL LIST PRICE $3717.95 


PLUS YOU CAN ORDER THESE BUSINESS PROGRAMS AT SALE PRICES 
UST SALE UST SALE 
Professional 80 Column Payroll $149.95 399.00 
Word Processor $149.95 $99.00 Inventory $149.95 $99.00 
Professional Data Base $149.95 $99.00 General Ledger $149.95 $99.00 
Accounts Receivable 5149.95 $99.00 Financial Spread Sheet 814995 $99.00 
Accounts Payable $149.95 $99.00 


UST SALE 
PRINTER REPLACEMENT OPTIONS Olympia Executive Letter Quality Serial Printer $699.00 $399.00 
(replace the 4023 with the following о! these sale prices Comstar Hi-Speed 160 CPS 15's" Serial Business Printer 577900 $499.00 
Telecommunications Deluxe Modem Package 519900 $139.00 


15 DAY FREE TRIAL. We give you 15 days to try ou! this SUPER SYSTEM PACKAGE! ! If it doesn't meet your expectations, just send it back 
to us prepaid and we will refund your purchase price! ! 

90 DAY IMMEDIATE REPLACEMENT WARRANTY. li any of the SUPER SYSTEM PACKAGE equipment or programs foil due to foulty 
workmanship or material we will replace it IMMEDIATELY at no charge! ! 


Add $50.00 for shipping and handling PROTECTO 
$100.00 for Alaska and Hawaii orders. 
WE DO NOT EXPORT TO OTHER COUNTRIES 


Enclose Cashiers Check ог Personal Check. Allow 14 days for ENTERPRIZES мо TOMER 


oa arta Or а enone үнде не peter ecd BOX 550, BARRINGTON, ILLINOIS 60010 
and MasterCard. We ship C.O.D. to вох 550, талмасы, ы 
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14” COLOR 
MONITOR SALE!!! 


(Lowest price in USA) 


Built in speaker and 
audio 


eFront Panel Controls *Beautiful Color Contrast 
For Video Recorders *High Resolution 
eFor Small Business/ *Sharp Clear Text 


*40 Columns x 24 lines 


Computers 
eApple-Commodore | o— PEs *List $399 
Atari-Franklin-etc. SALE $219 
14" Color Computer Monitor 


15 Day Free Trial - 90 Day Immediate Replacement Warranty 


БҮ E 
12" ЕЕ?" ui. RESOLUTION GREEN OR AMBER TEXT DISPLAY MONITOR 
List $249 SALE$119 
80 Columns x 24 lines, Hi-Resolution-crisp clear easy to 
read text with anti glare screen! A Must for word processing. 
12" ё ѕАМУО GREEN OR AMBER SCREEN MONITOR List $199 SALE $99 
80 Columns x 24 lines, amber or green text display, easy to read, no eye 
strain, up front controls. 


9" € SANYO GREEN SCREEN DATA MONITOR List $149 SALE $69 
80 Columns x 24 lines easy to read, up front controls metal cabinet. 


Ñ ada $10.00 for shipping, handling and insurance. Winole residents V 
| please add 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAI | 
| rs WEDO NOT EXPORT TO OTHER COUNTRIES ! 
I Enclose Cashiers Check. Money Order or Personal Check. Allow 14 | ENTERPRIZES «оноло 


і гегу. 2 to 7 days for phone order 
D з must be іп U.S. dollars. Visa. BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 


= 
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MPUTER PRINTER SALE!!! 
COM-STAR Т/Ғ 


Tractor 
Friction 


* Lowest Priced, Best Quality, Tractor-Friction Printers in the U.S.A. 
* Fast 80-120-160 Characters Per Second • 40, 46, 66, 80, 96, 132 Cha lers Per Line Spacing 
+ Word Processing œ Print Labels, Letters, Graphs and Tables * List Your Programs 
e Print Out Data from Modem Services • “Тһе Most Important Accessory for Your Computer” 
** DELUXE COMSTAR T/F Premium o 120-140 CPS Superior Quality 
80 CPS Printer — $169.00 152" COM-STAR PLUS+ 15%” COM-STAR PLUS+ H.S. 

This COMSTAR T/F (Tractor Frict Business Printer $349.00 High Speed 160 - 180 CPS 
PRINTER is ally ver das allt es of the MASTAR Business Printer $469.00 
prints B's" x Б t + ERINTER Каре This Super High Speed COM-STAR* 15%” 
sta ] feed ч en Business Printer has all the features of the 
paper COM-STAR BL S PRINTER witha 
80 CPS. racters (Centr Bet an Ер 
Parellel Int e SALE $349.00 
aeu] CHUTE CPS ledger business forms! 

10" -STAR PLUS+ i " al Centroni 

! Superior Quality Ж 

ШЕ отап 00 қ 10” COM-STAR+ H.S. зоо 
features > ( TA HIGH SPEED 160-180 CPS 
plus a 10 1 "S, 9x9 dot Business Printer $369.00 
matrix w ible st t This Super High Speed Com-Star- Business j 
18 dot matrix (near 1 Printer ha atu A Ф Olympia 
Et деліп S алса Ese : Executive Letter Quality 
and right margin duty c 8 DAISY WHEEL PRINTER $379.00 
prints standard, 
special chara 
quality and fea ; І e 
costing twice a 


Fantastic Letter Quality. 
bidirechi 


Parallel Inte 4 


E thai е! and 
FX80). List $49 SALE $249.00 5232С 9 SALE 5379. 


15 Рау Free Trial - 1 Year Immediate Replacement Warranty 


PARALLEL INTERFACES 
7900 Atari 850 Interface — $79.00 Рог ALL IBM Computers — $89.00 


TEES PROTECTO 
ENTERPRIZES «cocer 
КЕС ышы e ENTERPRIZES «е. 


days lor delivery, 2107 days for pho! 
VISA—MASTER CARD—We Ship СОО e: y Phone 312/382-5244 to order 


COM-STAR PLUS+ ABCDEFGHIIJKLMNOPOGRS TUVWXYZ 
Print Example: ABCDEFGHIJKLMNOPORSTUVWXYZ 1 2345678970 
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COMMODORE-64 ог VIC-20 


VOICE SYNTHESIZER 


MAKE YOUR 
COMPUTER TALK 


VOTRAX BASED 5 0 0 
HARDWARE ONLY 


You can program any words or sentences * Adjust volume and pitch * Make adven- 
ture games that talk • Real sound action games • Make customized talkies е (Demo 
disk or tape included) * Requires Speoker 


You can add TEXT TO SPEECH SOFTWARE that allows you to simply type what you 
want to hear!! Also allows you to add sound and voice to SCOTT ADAMS AARD- 
VARK and "ZORK" ADVENTURE GAMES List 529.95 Sale $19.95 (Disk or Tape) 


* LOWEST PRICES * 15 DAY FREE TRIAL * 90 DAY FREE REPLACEMENT WARRANTY 
ST SERVICE IN U.S.A. • ONE DAY EXPRESS MAIL + OVER 500 PROGRAMS • FREE CATALOGS 


COMMODORE 64 
80 presi BOARD 


FOR ONL 500900 


Now you сап program 80 columns on the screen 
at one time! Converts your Commodore 64 to 80 
columns when you plug in the PROTECTO 80 
Expansion Board. List $199.00. Sale $99.00. 


Includes 4 Slot Expander and can be used with most existing software 


WE LOVE OUR CUSTOMERS 


4 $300 for shipping. handling ond surance, Minois residents 
але лия | PROTECTO 
vs must be in 5. dollor 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 БЕ 4 
тенше баен око ые унае ENTERPRIZES «oes 
VBA MAS C сор. BOX 550, BARRINGTON, ILLINOIS 60010 
No C.O.D. to Canada, AFO-FFO. BOR а БАИН ТОНИ 
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COMMODORE 64 


Computer Learning Pad 


© 95 List $79.95 
Coupon Sale $49.95 


Hi-Resolution! 
NEW FROM TECH SKETCH 


е Makes graphic tablets 
Obsolete 


sf 


* Includes Special Printer 
Feature. e2 сай а 000.0 


ка те 


Now you get thisFantastic Tech Sketch Computer 
Learning Pad Program with a Professional Light 
Pen Free! (39.95 value) plus the Micro Illustrated 
Graphics Pad Program that allows you to draw оп 
your T.V. or monitor screen (better than Gibsons Press SPACEBAR tor piceanenu 
$99 light pen). Whatever you can draw on the 
screen you can print on your printer (a Tech 
Sketch Exclusive.) 

JOIN THE "NEW BREED" OF VIDEO ARTISTS’ 


Commodore 64 8. МІС-20 
$24.95 Professional Model $24.95 
Light Pens 


Professional Light Pen. This is the TECH SKETCH Hi-Resolution model that allows you to draw fantastic 
pictures and professional diagrams — single-pixel accuracy! (Includes famous paint and sketch program.) 
List $39.95. Sale $24.95. Coupon $22.95 


$24.95 — 


[ Economy Model with 3 programs $16.95 


Add $300 for shipping handling and insurance Illinois residents 
please add 6% tox Add $6.00 for САМАСА PUERTO RICO HAWAII 


ALASKA. APO-FPO orders. Canadian orders mus! be in US dollars 


WE DO NOT EXPORT TO OTHER COUNTRIES ENTERPRIZES ^: 


Enclose Coshiers Check, Money O 
ые жнын » BOX 550, BARRINGTON, ILLINOIS 60010 


VISA — MASTER CAI 
No C.O.D. to Солобо. APO-FPO. Phone 312/382-5244 to order 
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а Scholastic Software 


Commodore 64 


Super School Savings 


0800 Agent U.S.A. Agent USA challenges the 
player to intercept the Fuzzbomb by travelling 
across the U.S.A. You must use your 
zones, state capitals, 
geography, map 
reading, and route 
planning to achieve 
your goal. Fantastic 
adventure game with 
full color graphics and 
excellent sound. 
(Disk.) List $34.95. 
Sale $24.95. 


knowledge of time 


0804 Banner Catch. This one even teaches 
Binary numbers. Players must work together as 
a team in this capture the flag game where you 
must get Max's flag before his robot raiders get 
yours. Fantastic play 
action and teamwork 
and cooperation skills 
make this a must for 
everyone. 
(Disk.) List $34.95. 
Sale $24.95. 


0808 Spell Diver. Sharpen spelling skills, 
improve reading, word recognition апа 
retention. The player is a diver who must 
explore the ocean floor to find and uncover 
letters. The more quickly a player can guess a 
word the more points 


are scored. Sea 
creatures and other 
dangerous surprises 
plus a time limit make 
it more exciting. 
Fontastic graphics and 
sound. (Disk.) List 


$34.95. Sale $24.95. 


0816 Tales Of Mystery. Two more famous 
twist-a-plot adventures that challenge the 
player first, to find a friend lost in a haunted 
house. Second, to find 
a statue stolen from 
ап island. Fantastic 
graphic adventures. 
(Disk.) List $29.95. 
Sale $17.95. 


‘Add 53.00 tor shipping. handling and и 
please add 6% tox. Add $6.00 for САМА! и 
ALASKA. APO.FPO orders. Canadian orders must be in U.S, dollars 
WE DO NOT EXPORT TO OTHER COUNTRIES. 
Enclose Cashiers Check, Money Order or Personal Check, Allow 14 
days for delivery, 2 to 7 days for phone orders, 1 day express той! 
VISA — MASTER CARD — C.O.D. 
No C.O.D. to Cenedo. APO-FPO. 


0812 Double Feature Adventure. Two full 
color graphic adventures that allow the player 
to choose among danger, humor, excitement 
and chance. Plus these programs make the 
players stars of the adventure. Explore the 
microzone ог the 


Northwoods while 
NORTHWOODS improving reading 
— skills and building 
vocabulary. 
(Disk.) List 529.95. 


Sale $17.95. 


0820 Square Pairs. Sharpen and improve your 
vocabulary, reading, and spelling skills while 
improving deduction and memory. You must 
match characters іп 
the ready to play 
games then you can 
create your own. (1 to 
4 players.) 
(Disk.) List 529.95. 
Sale $17.95. 


PROTECTO 


ENTERPRIZES WE LOVE OUR CUSTOMERS) 


BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 
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Commodore 64 
Án (Modem) 2k 


Complete Auto Dial 
Telecommunications Package 
"The only telecommunications package you will ever need." 


det ~ Total ——— 
Telecommunications 


* 300 Baud Modem * AutoDial * Auto Answer * Upload & Download 
е Membership іп 52 Database Services (UPI News) 


Reach Out and Access Someone 


* Educational courses * News Updates and Information 
* Financial Information * Popular Games * Electronic Shopping 
* Banking at Home * Research and Reference Materials 


The Total Telecommonications Package offers you all this plus ... 


* Auto Log-on * Stores on Disk Downloaded Files 

* Dialing from Keyboard * Reads Files from Disk and Uploads Text or Program Files 

* On-line Clock % Select Any Protocol (access almost any computer or modem) 
* Capture and Display High Resolution Characters — * Plus Much, Much More 

. 


Download Text, Program ог Data Files $ 7 E оо 
List $129.95 Special Low Christmas Price 


We are so sure this is the only telecommunications package you will need we will give you 15 days Free Trial. 


‘Add $3.00 for shipping handling and insurance Illinois residents 
please add 6% tax, Add $6.00 for CANADA PUERTO RICO HAWAII 
ALASKA, APO FPO orders. Canadian orders must be in U S dollars 


WE DO NOT EXPORT TO OTHER COUNTRIES 


Enclose Cashiers Check. Maney Order or Personal Check. Allow 14 ENTERPRIZES «ооло 


doys for delivery. 2107 days lor phone orders. 1 day express mail 
VISA — MASTERCARD СОО BOX 550, BARRINGTON, ILLINOIS 60010 
No C.O.D. to Canada_ APO FPO Phone 312/382-5244 to order 
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yden’s Computer Software 
Price Breakthrough 


îi Commodore 64 
Your Choice 


5695 


Originally $24.95 10 $34.95 


T4 ——— 


ІІ 


чи 


| 
i 
1 
Н 
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Text 
Adventure 


Crime Stopper: Championship Golf: 


Assume the role of 


Education 


Select club, strike. 
а private eye to 
save a kidnapped Баар amus юг 
heiress. MicroAddition Match-Up: 
MicroSubtraction 3 matching games 


Crystal Caverns: 
Find hidden buried 
treasures under an 
old mansion. 


Strategy Games 


Final Conflict: King Cribbage: 
Program robots to destroy Graphic version of the 
enemy's base. Battlefield classic cord game. Hi-res 
variations game can be graphic representation of 
played against computer playing ^ cords апд 
or opponent cribbage board 
Reversal: 

I 


о 


Sargon 


An engaging word game like 


lexicon, 


It includes o diagnostic Pre- 
strengths and weaknesses іп! 
verbal section of the SAT 
strategies and two timed sii 
scored on the "800" scale 


Add $3.00 for shipping. handling and insurance. illinois residents 
please add 6% tox. Add $6.00 for CANADA, PUERTO RICO. HAWAII 
ALASKA. APO.FPO orders. Canadian orders must be in US. dollars 
WE DO NOT EXPORT TO OTHER COUNTRIES 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
days for delivery. 2 to 7 days for phone orders. 1 day express mail! 
VISA — MASTER CARD — C.O.D. 
No C.O.D. to Canada, APO-FPO. 
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ther Great Values From H 


The best selling microcomputer chess game in the 
world. A classic game with seven levels of play 


Word Challenge: 


lozens of game variations 


. Offers test-taking 


MicroMultiplication for pre-school that 
MicroDivision use colorful objects 


Color animation that teach the 
and cheerful tunes principles of 
make learning "some," "related," 


arithmetic fun and "different." 


Don't Shoot That Word: 


Your beginning readers will become skilled 
with this f 


ayden 


was $34.95 


now $17.95 


was $39.95 


now $29.95 


Boggle, 90,000 word 


SAT Sample Tests: 


test for determining 


he mathematical and was $34.95 


now $17.05 
PROTECTO 


ENTERPRIZES «mm 


BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 


mulated SAT exams 


| http//wwwold 


бі Avalon Hill % 


World Renowned 
Strategy Games of the Masters 


ww Super Strategy Sale 


Telengard-Real Time. This 
is the game all the dungeon 
fans have been waiting for. 
Use wits, magic, and fast 
thinking to overcome the 50 
levels of the TELENGARD. 
Fantastic graphics and 
action. (Disk.) List $29.95. 
Sale $19.95. (Tape.) 

List $24.95. Sale $16.95 


Panzer Jagd. Fantastic tank 
simulation puts you in the 
German seat forced to 
secure the area of tne 
Russian front. If you succeed 
your remaining units are 
saved for the big battle. See 
if you can rewrite history or 
make the same mistakes. 
(Great playability.) (Disk.) 
List $29.95. Sale 521.95. 


B-1 Nuclear Bomber. Pilot a 
Bl B-1 bomber through stiff 
NUCLEAR Russian defenses on the way 
BOMBER to the target city. The 
MATA on computer controls Soviet MIG 
= 74 fighters and surface to air 
missiles. You must rely on 
your electronic counter 
measures and self defense 
missiles to succeed. Fantastic 
strategy game. (Tape.) List 
$19.95. Sale $13.95. (Disk.) 
List $24.95. Sale $18.95. 


Add $3.00 for shipping, handling ond insurance. illinois residents 
please add 6% tox. Add $6.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA, APO-FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES. 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
days lor delivery, 2 1o 7 days for phone orders, 1 day express mail! 
VISA — MASTER CARD — C.O.D. 
No C.O.D. to Conodo, APO-FPO. 
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T.A.C. (Tactical Armor 
Command.) Fantastic 
computer adaptation of the 
famous board game. The 
player or players control up 
to 8 units simultaneously 
including tanks, infantry and 
anti-tank guns. (Fantastic 
graphics.) (Disk.) List $44.95. 
Sale $34.95. 


Commodore 64 


Legionnaire. You as Caesar 
Augustus command up to 10 
legions against an army of 


barbarian infantry, all 
aspects including cavalry, 
shock effects, fatigue, 


morale and slope effects as 
the battlefield scrolls before 
you in full color and 
animation. (Торе) List 
539.95. Sale $24.95. (Disk.) 
List $44.95. Sale $27.95. 


Commodore 64 


Computer Football. Match 
wits against the computer or 
another live opponent. This 
fantastic game based on the 
award winning Sports 
Illustrated game of 
professional football will 
keep you going for hours. A 
must for all the Armchair 
Quarterbacks of the world. 
(Tape). List $19.95. 

Sale $13.95. (Disk.) 

List $24.95. Sale $18.95. 


Г УГ УГ 


T 


Tactical Armor Command. 


PROTECTO 


ENTERPRIZES 


(WE LOVE OUR CUSTOMERS} 


BOX 550, BARRINGTON, ILLINOIS 60010 


Phone 312/382-5244 to order 


Red Razzberry Fantastic 
educational game that teaches 
spelling and good sentence 
structure. First you must pick the 
missing letter for the word (correct 
spelling) then you must pick the 
two missing letters for the word 
Finally you must pick the correct 
word for the grammatically correct 
sentence. Great for students and 
adults. List $24.99. Sale $16.95 
(Disk) 


Plantin Pal Finally а full 
analysis and advisor for all your 
gardening needs. Plantin Pal asks 
you what you want to plant (gives 
Suggestions too!). Then tells you 
where to plant them! (garden 
layout) How to take care of them! 
Plus what to do when something 
goes wrong! (Insects. pests. and 
plant diseases) Fantostic for all 
your gardening needs. List $29.99 
Sale $19.99 (Disk) 


Speed Reading Coach — Teaches 
vocabulary. comprehension, and 
speed to help you read better. Eye 
training and vocabulary come first 
then the screen flashes word by 
word or sentence by sentence 
through paragraphs and asks you 
questions when you're done 
Fantastic Reading Aid. List $29.99 
Sale $19.99 (Disk 


Add $3.00 for shipping handling and insurance. Illinois reside 
please add 6", tax Add 56.00 lor CANADA. PUERTO RICO. НАЗ 
ALASKA APO.FPO orders. Conadia must be in U.S. dollor 


WE DO NOT EXPORT TO OTHER COUNTRIES. 
Enclose Cashiers Check. Money Order or Personal Check Allow 14 
days for delivery 2 to 7 days tor phone orders 1 day express mail! 
VISA MASTERCARD — COD 
No C O.D. to Conodo. APO-FPO. 


Robin Hood — You os Robin must 
fight your way through Sherwood 
Forest, Nottingham Castle, past the 
Duke. rescue Maid Marion, ond 
finally steal the gold. Fantastic 
graphics with 5 different screens of 
challenges List 519.99. Sale 
$14.99. (Disk 


Ice Palace — You as the Penguin 
must make your way through the 
automated Ice Block Factory on 
your way to your true love. 3 
screens worth of melting ice 
blocks, deadly snowballs, and 
Freddies Fire Demons try to stop 
you. Plus you must eat the fruit to 
keep your strength up and build an 
ice ladder before your love can be 
yours again. Fantastic graphics and 
action. List $24.95. Sale $19.95 
Disk) 


Sir Lancelot Fight your way 
through the castle, kill the dragons. 
and save the maiden. But this is just 
the beginning! 8 more quests with 
8 more challenging screens await 
your rise to be knighted king of the 
realm. Fantastic graphics and 
sound. List $19.95. Sale 
$14.95 .(Disk) 


PROTECTO 


ENTERPRIZES me 


BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 
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COMPUTER SOFTWARE 
желеу ares Ау Pe аот бате Aer 


E Buy ts Ot One 


Commodore 64 


(Expires 12-25-84) 


% (Limit; One Per Customer) 


The Best Arcade Games Around 


World's Greatest Baseball — Finally а great sports game. Realistic right down to the 
playing field. Contro.! all the actions -even the outfielders. Play realistic baseball all 
year round. (Fantastic graphics, action, and sound!) (Disk) List $34.95. Sale $27.95. 


Robots of Dawn — Elijah Baley is here from the best-selling science fiction series by 
world renowned author Isaac Asimov. Now you can become Earth's most famous 
detective in this exciting test-adventure. Question the inhabitants of far flung cultures 
— who's lying, who's telling the truth, and who is trying to murder you? Jump into the 
action in this fascinating epic murder mystery. Can you piece together the elusive clues 
to solve the eternal question "who done it?" (Disk) List $39.95. Sale $27.95. 


PROTECTO EXCLUSIVE 


Barbie — The biggest name in dolls. Browse through Barbie's close! full of beautiful 
—, clothing and dress her for the party. You can cut her hair or make it longer and color it 

or change the style. Buy new clothing at the boutique or any of the six other specialty 
| shops, or even go to the dress shop and create Barbie's designer clothes with the help 
of the computer. The combinations are endless and so is the fun. One or two players. 
(Disk) List $39.95. Sale $27.95. 


G.I. Joe — The best selling toy soldier is now available as оп activity toy on the home 
computer. Select the battle situation then choose the equipment you think you will 
need to get the job done. Choose from a number of uniforms and weapons in your well 
stocked arsenal and get ready for the action. Play alone or with a friend, if you plan 
the ight strategy you will complete the mission if not you will have to try again. One or 
two players. (Disk) List $39.95. Sale $27.95. 


PROTECTO EXCLUSIVE 


Hot Wheels — Now all the action and fun from playing with Hot Wheels cars is taken 
опе step further on the home computer. Hot Wheels lets you choose your play activity 
| from repairing cars to the destruction derby. You can actually play the activities along 

with a partner on the computer screen, even build and customize your own cars. A 
whole new way to play Hot Wheels. One or two players. (Disk) List $39.95. Sale $27.95. 


Break Dance — Break Dance is an action gam which your dancer tries to break 
through a gang of break dancers descending on him. "A simon-like game” where your 
dancer has to keep the steps of the computer controlled dancer, and even a free dance 
segment where you develop your own dance routines and the computer plays them 
back for you to watch. Now anyone can break dance! ! (Disk) List $39.95 Sale $27.95. 


Ж. Buy Epyx games from Protecto and choose Silicon Warrior, Lunar Outpost, or Upper Reaches of Apshai FREE! 
(539.95 value) 


In case of stock outage we will substitute. 


Add $3.00 for shipping, handling ond insurance. Minois residents 
please add 6% tax. Add $6.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA. APO.FPO orders. Canadian orders must be in U.S. dollars 
WE DO NOT EXPORT TO OTHER COUNTRIES 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 Love our cus 
Ck ep E ENTERPRIZES «m 
кары ЧЫЧА EOM DERE BOX 550, BARRINGTON, ILLINOIS 60010 
. Phone 312/382-5244 10 order 
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“Introducin 
the Word Processor 


with Less.” 


WORD COMMANDER t. Your Commodore never again at a loss for words 


NOR have to look very closely to find what we left out of our new word processor. But 
once you try the WORD COMMANDER 64 you'll discover what's missing. We've taken the 
process out of word processing and put it where it belongs—in our software. With the 
WORD COMMANDER 64 there's less for you to do and more that it does. And that makes 


you look good. 


Only Two Hands. 


The WORD COMMANDER 64 is a 
complete word processor. We've 
included every function you'll need and 
some comforts you'll enjoy, And we 
didn’t hide them in complicated codes 
or commands that require three hands. 
Everything about the WORD 
COMMANDER 64 makes plain sense. 


Less Hassle. 
When you write you probably change 
your mind a lot. Now changing your 
text is almost as easy as changing your 
mind. Like when you want to 
underline a word or group of words all 
you do is press COMMODORE-U" 
—regardless of the printer control code 
your printer uses. 
Simple. 


Less is More. 


While simple to use, you won't find the 
WORD COMMANDER 64 lacking in 
power or sophistication. We've 
integrated all of the best features into 
the WORD COMMANDER 64: 

соммосон 


http: 


ester trademark of 


*extremely user friendly 

emenu driven 

*full word wrap 

block text right 

“center text 

eright justify text 

edelete a block of text 

*insert a block of text 

*move a block of text 

«сору a block of text 

*three different fonts supported 

print in bold type 

print in elongated type 

*allows sending of any control codes to 
your printer 

select any background color of your 
preference 

select any character color as well 

‘select cursor color 

*set top, right, bottom and left margin 

*set line spacing 

print headers and footers on every page 

*automatically number pages 

print subscripts and superscripts 

*underline text 

esearch for specific text 

esearch and replace 

echange margins, font, or justification 
from within your document 

*full 80 column view of the page before 


printing 
suse MMG's MAIL LIST for mail merge 
capability Es 
Reader Service No. 51 


Follow Your Ideas. 


The words you need to write represent 
your ideas; and they flow—one after 
another. So we designed the WORD 
COMMANDER 64 to work along with 
your thought processes. And not slow 
you down. We did that by making it 
less complicated and easier to use. So 
easy you probably already know how 
to use it. 

Oh, there's one more thing missing 
from the WORD COMMANDER 64, 
the high price: Only $49.95 


Includes full manual and tutorial. 


How to Get Yours. 


Available at your local dealer or direct 

from MMG Micro Software. Just send 

check or money order to: 

P.O. Box 131 Marlboro, NJ 07746 


Or for MasterCard, Visa, and C.O.D. 
deliveries call: (201) 431-3472. 
Please add $3.00 for postage and 
handling for all direct orders. New 
Jersey residents add 6% sales tax. 


http 


CELL DEFENSE 
HesWare 
Commodore 64 
Disk; $29.95 

Few real-life situations adapt 
themselves as neatly to the arcade 
game format as the life-or-death 
struggle that occurs in the human 
bloodstream between the body's 
immune system and viral invad- 
ers. So closely does this micro- 
drama parallel many a popular 
videogame that children who play 
Cell Defense should find it no 
less entertaining to zap viruses 
than spaceships or killer robots. 


You want villains? You got ‘em, 


in the form of viruses that attack 
healthy cells (another videogame 
staple: helpless victims) and com- 
mandeer their chemical supplies 
to produce more viruses and 
spread disease throughout the 
body. You want heroes? They 
come under a variety of names: 
interferon, macrophages, antibod- 
ies, and committed T-cells. Like 
good game characters should, 
these various cell defenses have 
abilities as diverse as their names. 
The game's designers took no sci- 
entific liberties in so endowing 
them: nature was imaginative 
enough. Interferon cannot help in- 
fected cells, but can stop viruses 
from reproducing inside healthy 
ones. Macrophages (meaning “big 
eaters”) gobble up viruses that 
have not yet entered cells. Anti- 
bodies patrol the bloodstream and 
destroy viruses that enter their 
area. Committed T-Cells attach 
themselves to infected cells and 
blow them up. 
The playfield is 


even formatted 


in a manner familiar to game fans: 


multiple battlefronts (cells), one 
onscreen at a time, which the 
player traverses by left-right and 
up-down scrolling while watching 
for attacks via an onscreen scan- 
ner. You carry defenses from cell 
to cell with your cursor, toting 
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Your object is to catch a virus. 
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committed T-cells to cells that are 
ssly overrun, macrophages 
swarming with loose vi- 


lustration shows a typical 
cell, with the scanner in the lower 
left hand corner, and a represen- 
tation of the patient above it. The 
figure turns green, thermometer- 
style, to indicate how sick the pa- 
tient is. If the viruses destroy half 
your patient's cells, 60% of his 
labile cells, 50% of his stable 
(slowly reproducing) cells, or 
40% of his perennial (non-repro- 
ducing) cells, he turns as green as 
a frog—and croaks. To win, you 
must wipe out all the viruses be- 
fore the damage goes too fa 
Difficulty level is easily con- 


trolled by adjusting four variables: 
number of cell layers, virus re- 
production rate, cell regeneration 
rate, and health of organism. 

The graphics, in addition to be- 
ing colorful and engaging, are ac- 
curate. A child should have no 
trouble recognizing a stable cell 
after seeing it repeatedly in this 
game. Whether or not he'll ever 
be required to recognize a stable 
cell is another question. Cell De- 
fense teaches and reinforces the 
meanings of about a dozen bio- 
logical terms. The two high 
school bio teachers we spoke to 
felt it was unlikely that the body's 
immune system would be covered 
in sufficient depth in a high 
school class to include even half 
of the dozen terms. And even if 
it were, your child is still learn- 
ing only a dozen terms. At 
$29.95, that's over $2.00 a term. 
It might not have been possible to 
make the game broader-based with- 
out sacrificing the drama of the 
gameplay, but...chee, $2.00 a term. 

The manual (designed to resem- 
ble a notebook) warns children 
that Cell Defense offers only ап 
ultra-simplified introduction to the 
subject of the body's immune sy 


Trivia Fever (see page 36) includes multiple handicapping facilities. 
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tem, and recommends several 
readings. If the game can stimu- 
late further investigation, it's 
worth the price. And this game is 
well-constructed enough to do ex- 
actly that for many children. 

HesWare, 150 North Hill 
Drive, Brisbane, CA 94005 
(phone; 415-468-4111). 

—Greg Fried 


TRIVIA FEVER 
Professional Software, Inc. 
Commodore 64 
Disk; $39.95 

In reviewing Trivia Fever, the 
comparison to Trivial Pursuit is 
unavoidable. If trivia grabs you, 
you probably already own the lat- 
ter game, or have access to it 
through a friend. Why do you 


SOFTWARE 
отел 
HANDBUOH 


ayo" For the (64 


7326 N. ATLANTIC, PORTLAND. OR 97217 
= CHECK ол MONEY ORDER ONLY - 
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need a trivia game that you can 
play on your 64? 

You don't. If you've already got 
Trivial Pursuit, we'd pass this one 
up. Trivia is trivia is trivia. But if 
you're looking to make your first 
trivia game purchase, Trivia 
Fever has several advantages over 
its famous precursor. 

The gameplay offers no surpris- 
es—it's just trivia questions, lots 
of them, in seven categories 
(from which each player selects 
five): science and technology, 
geography, history, sports, films 
and entertainment, famous people, 
and nature and animals. To win, 
you or your team must answer 
the user-designated number of 
questions in each of five categor- 
ies, then a category completion 
question for each, and finally a 
game-winning question. 

No big differences there. Trivia 
Fever is different in its use of the 
computer screen. No graphics are 
offered, and very little effort was 
expended to make the lettering 
exciting. Still, seeing the answers 
flash on the screen adds a nice 
element. What's the most exciting 
moment of any game of Trivial 
Pursuit? When an answer is an- 
nounced as correct, of course. 
And having that verification sup- 
plied visually is doubly exciting. 

Little messages that appear fol- 
lowing correct and incorrect an- 
swers also add to the fun: “May- 
be you'd better study up on that 
subject,” “Gee, you must be 
smarter than you look,” etc. The 
novelty wears off long before 
game end, but it's fun all over 
again with each new group of 
players. 

Not having to put down your 
soda or quickly down your hand- 
ful of Doritos to pull and read a 
card, roll a die, or shuffle a play- 
ing piece around a board is an 
advantage as well. You can 
stretch out comfortably anywhere 


within view of the screen, so long 
as one player sits by the computer 
and keeps things going. Of 
course, the inconvenience associa- 
ted with this convenience should 
be apparent: most people don't 
have their computer, disk drive, 
and monitor set up in their living 
room. Disconnecting cables and 
moving hardware is no one's idea 
of party fun—not to mention put- 
ting it all back in order, along 
with the rest of your house, after 
your guests leave. You can al- 
ways play in your computer work 
room, if you can fit the chairs, 
and if you don't mind sacrificing 
comfort. Or you can play Trivia 
Fever without the computer, 
which it’s designed to allow you 
to do, reading questions out of 
the thick paperback book pack- 
aged with the disk. But then 
what's the advantage over Trivial 
Pursuit? 

Even then, Trivia Fever offers 
a big advantage—in its multiple 
handicapping facilities. To prevent 
trivia whizzes from running away 
with each and every game, you 
can give them less time to answer 
their questions (kept track of by 
the computer; when played manu- 
ally, by a watch); require them to 
answer more questions to com- 
plete each category; or randomly 
assign, rather than let them pick, 
their five of seven categories. 

With some imagination, you 
could adapt these and a dozen 
other handicapping methods to 
Trivial Pursuit as well. But Fever, 
unlike Pursuit, offers the option 
of Level 1, 2, or 3 questions. 
Those Level 3's are a very effi- 
cient leveler for even the most 
awesome trivia expert, while al- 
most anyone can at least be com- 
petitive at Level 1. 

Professional Software, Inc., 51 
Fremont Street, Needham, MA 
02194 (phone: 617-444-5224). 

-Мапіп Foster 


DATABASE MANAGER 
Mirage Concepts, Inc. 
Commodore 64 

Disk; $89.95 

Mirage’s Database Manager 
(DBM) gives you a flexible filing 
system to manipulate just about 
any type of list or record you 
want. Store names and addres: 
coin or stamp catalogs, book or 
record collections; or get fancy 
and automate class records, inven- 
tory, or expense accounts. Within 
the limits of Commodore's disk 
drive (your complete list of data 
must be less than about 150,000 
characters) and short of needing a 
true accounting system (with re- 
ceivables, payables, and general 
ledger), you can set up almost any 
type of datal 

After reviewing the 174-page 
manual's excellent tutorial, you 
can design a custom form on the 
screen, Although limited to 40 
characters in width, it can be 
about 60 lines long; when you get 
to the bottom of the screen, the 
form scrolls up. The process is 
easy. Position the cursor where 
you want the label for the first 
blank to appear, type the label, 
then type dashes for the length of 
the blank. 

Everything in this program is 
menu-driven. The top nine screen 
lines will always tell you where 
you are and give options for what 
you can do next. See a mistake? 
Hit f7 and DBM undoes your last 
step. 

Forms are subject to several 
limits, none of which will restrict 
you unless you have lots of data. 
The maximum length of your 
form (titles and blanks) is 2500 
characters. Up to 2000 of those 
characters can be blanks, or data 
you enter. Each field, or blank, 
can be up to 250 characters; and 
you can have up to 200 fields. 

This allows you more freedom 
than about X of the database pro- 


grams on the market for the C-64. 
Needless to say, these limits in- 
volve tradeoffs. If you use all 200 
fields in your form or record, 
they cannot each be 250 сһагас- 
ters; that's way above the 2000 
character limit for single record. 
Some of your fields can be саіси- 
lated from the contents of other 
fields so, for example, DBM could 
automatically enter tax and total 
cost on an invoice form. 

After the form is safely saved 
on disk, you can enter data. A 
blank form will appear; just use 
the function keys to position the 


174 p. manual has excellent tutorial. 
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cursor at any blank to enter or to 
correct data. When you're done, 
hit a function key to store the data 
and go to the next record. If you 
later realize you've made some 
mistakes, it's easy to recall indi- 
vidual records and correct only 
those fields which have bad data. 
DBM will accept some incorrect 
input, such as $89.9, without 
warning you. 

Next, you'll probably want to 
sort your records in alphabetical 
or numerical order based on the 
contents of a field. You can sort 
your data only in ascending (A to 
Z) order, though you can review 
backward through the file. DBM 
also handles multiple sorts. Say 
you want your address list in or- 
der by zip code, but within each 
zip code, you want the records in 


order by last name. Just sort the 
file twice; first by name, then by 
zip code. You can do this for as 
many fields as you want. 

DBM does not actually rewrite 
the records in the new sorted or- 
der on the disk. It creates a sep- 
arate file which points to the rec- 
ords in order. The beauty of sort- 
ing this way is that you can create 
separate sort indexes for several 
fields in the same file. With your 
address list, you could create a 
membership list (use the last 
name sort index) and mailing la- 
bels (use the zip code sort index). 

When you have all your data 
entered, finding individual records 
or groups of records is a snap. 
Once again, just follow the menus. 
You can use any arithmetic opera- 
tors allowed by BASIC. Enter a 
simple equation (up to 70 charac- 
ters) like f$(3)- "SMITH" AND 
f$(9) « > “10001” to find all the 
Smiths who don't live in one zip 
code in New York City. The f$(3) 
represents the third field you en- 
tered when you built the form. 
Search equations can actually be 
quite complex, allowing you to 
find very specific records, Even 
the BASIC functions MID$ and 
VAL are allowed. 

The printing capabilities of 
DBM are its weak link. To get 
more sophisticated features, you 
will have to buy its companion 
program—Advanced Report Gener- 
ator for $49.95 (reviewed next is- 
sue). 

With DBM, you have three 
printing options. You can print 
each record on a separate form, 
exactly as it appears on the screen. 
You can print your data in col- 
umns with each record on one 
row, and headings, like field 
names, for each column. Or, you 
can print mailing labels with up 
to four lines. Unfortunately, the 
first line of a mailing label can 
represent only one field from your 
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Tell it Write Now!, and it will—with instant execution of instructions. 
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form, so if you used separate 
blanks for first and last names, 
only the last name will fit on the 
mailing label. 

DBM allows you to change the 
format of a form or to add new 
fields with its Merge Files func- 
tion. Create a second form, with 
the new fields included, and DBM 
can automatically move all the 
data from the old form into the 
new one. Since both databases 
will have to exist at one time on 
the same disk, the maximum size 
of a file to be reorganized like 
this is about 75K. 

To get around that limit, you 
could always break your database 
file into subfiles. Creating subfiles 
is also a nice way to clean up a 
database. If you keep class rec- 
ords on your sixth, seventh, and 
eighth graders, at the end of the 
school year you can have DBM 
create a subfile of just the sixth 
and seventh graders—the ones 
you'll have again next year. There 
is even a powerful Replace Fields 
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function that lets DBM go through 
the records and automatically ad- 
vance the grade level of each 
child who passed. 

DBM gives you a flexible filing 
system that is compatible with the 
form letter functions of most word 

ility to do sub- 


applications, and its limited report 
formatting will probably force you 
to buy the companion program. 
Mirage has created a program that 
is capable of performing the func- 
tions of many of the more-limited 
programs on the market like rec- 
ipe filers, automated gradebooks, 
and mailing list programs. 

Mirage Concepts, Inc., 2519 
West Shaw, Suite 106, Fresno, CA 
93711 (phone: 800-641-1441). 

—Richard Herring 


WRITE NOW! 
Cardco, Inc. 
Commodore 64 
Cartridge; $3995 
Finding a full-featured, inexpen- 


sive word processor for the Com- 
modore 64 can be difficult. Find- 
ing one that works with tape or 
disk is harder. Finding one that’s 
fast is even harder. Here it is! 

Cardco, Inc. has a habit of see- 
ing a marketing hole and then 
coming up with the product to fill 
it. They started out with printer 
interfaces, then keypads, letter 
quality printers, and now word 
and data processing—all aimed at 
the Commodore 64. With Write 
Now!, they've plugged a hole per- 
fectly. 

Because it's on cartridge, the 
program loads automatically. It 
takes awhile, but a lot less time 
than a program on disk or tape. 
Once it's there, it's quick. Except 
for the rare occasions of loading 
or saving text, execution of in- 
structions is instantaneous. Text 
can be saved to disk or tape. In 
fact, Write Now! is flexible 
enough even to work with a hard 
disk system, if one comes along. 

It's hard to decide where to 
start saying nice things about this 
program. It has all the features of 
expensive word processors: from 
page formatting to boilerplate text, 
reading one file into another, 
chaining files together, block man- 
ipulations, find and replace 
searches, even conditional paging. 
With the Mail Now! disk program, 
merge printing can even be done. 
Headers and footnotes are easy, 
too. 

The only time the program goes 
to a menu is at print time or to 
do disk operations. These menus 
are called by using the Commo- 
dore's eight function keys. The de- 
fault values in the print menu are 
so well chosen most users won't 
need to change them. 

There are several hidden options. 
in the print menu. One will out- 
put the text to the screen as it 
would appear if printed. This 
"preview" mode can save a bun- 
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dle of paper if used properly. 
Should the user's printer need line 
feeds in addition to carriage re- 
turns, one hidden print option is 
the auto line feed mode. Another 
is the ASCII conversion mode. 
This option converts CBM ASCII 
to regular ASCII before sending it 
to the printer. Because these op- 
tions are only used in special cir- 
cumstances, they don't appear in 
the regular print menu. 

A separate menu can be called 
to select tape or disk, the printer 
device number, and the secondary 
addres 

Disk functions are performed 
from another menu and do not in- 
terfere with the text in memory. 
This means that if you run out of 
room on a disk, you can format a 
new one and use it or delete files 
until there is enough room on the 
old disk, It is also possible to re- 
name files from this menu. A file 
may be saved under more than 
one name, so the user can create 
backup files easily, The last file- 
name used is saved as a default, 
and Write Now! automatically 
scratches the old file before writ- 
ing the new one, preventing disk 
errors. 

Two of the function keys save 
and load files. After activating the 
save function, the program needs 
to know the file name to store the 
text in. As mentioned earlier, the 
last file name entered appears as a 
default. This is changed simply by 
typing in a new file name. The 
load command works similarly. 

The documentation is excellent. 
The table of contents is very spe- 
cific. The index is well done. And 
the positive, encouraging tone is 
marvelous. The authors don't ex- 
pect the new user to be totally 
fluent in word processing terms. 
The text of the manual is informa- 
tive without being condescending. 
The keyboard overlays provided 
make it easy to figure out which 
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keys to press to accomplish any 
goal. Should the user forget a 
command that isn't on the key- 

g the function seven 
alls up a eroup of Help! 


menu: 


Like many of the top rated pro- 
grams, Write Now! uses dot com- 
mands to perform many tasks. 
These would be the primary rea- 
sons a user would need the Help! 
menus. All the commands are 
listed alphabetically in the index. 
These listings contain a brief (two 
or three words) description of 
what the dot command does. For 
instance, .SP is the command to 
send a special code to the printer. 
The index listing reads 


-SP (SEND PRINTER CODE). .... 55 


Page 55 contains a one-para- 
graph explanation of the command 
and how it works. All of the dot 
commands are explained this way. 
One trip through the manual 
should get the average user famil- 
iar with the layout. With the 
depth of the indexing, it shouldn't 
be hard to locate any parti 
command within a few minutes. 

To really help the novice word 
processor user, Cardco has even 
included a listing of the special 
codes needed by the most com- 
monly used printers. These spec 
codes allow the user to turn un- 
derlining, boldface, emphasis, ex- 
panded print, italics, subscript and 
superscript, and/or correspondence 
mode on and off. Not all printers 
can perform all these functions, 
but the Write Now! manual in- 
cludes tables with the codes for 
the most popular printers current- 
ly in use. One table has Epson, 
Star, Okidata, Prowriter, C-Itoh, 
NEC 8023, Axiom, and Commo- 
dore dot matrix printers. Another 
has the Cardco, Brother, Smith 
Corona, Silver Reed, and C-Itoh 
typewriter quality printers. 
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A monthly disk 
publication for 
Commodore 64 


Available at dealers everywhere! 


Issue Number 3 contains: 
SMURK CHECKBOOK 
BALANCER 


Tell your C-64 the most 
‘arene money en 


4-MINUTE COPY 
зит thom Germany. 


GUESS WHAT? 
су eem BASE CONVERTER 


POKER PARLOR 


16 (MEX) 


TABLES & PEOPLE 
notte: A GARDENING 


LOADSTAR comes опа 
double-sided diskette, 
LOADSTAR is a bonanza 
of unprotected programs. 
LEARN -programming techniques 
USE- useful programs 
ENJOY - games and novelties 
SHARE - experiences with other 
‘Commodore-64 owners 


send to: LOADSTAR 
P.O. Box 30007 
4023 Greenwood Rd. 
Shreveport, LA 71130-0007 
(318) 868-7247 


Enclosed is $9.95 for 
number 3 as shown above. 
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HEAT DISSIPATING KIT 24.95 

Reduces internal temperatures to sale operating levels 
Does not promote dust migration. No added nose. Easy 
to install Increases ite expectancy and reliably ot dk 
drive Increases operating time and Ме of disk arve In 
stalls on both VIC-1541 anc 1541 Disk Drives. 

The heat dissipating kit cools the internal components 
ofthe Disk Drive by transferting internal heat to an exter 
‘al heat ink, where the heat is nen dissipate into the 
surrounding air The kt wil ower operating temperatures. 
of the IC's by as much as 20 degrees C (36 degrees Р) 
and thus allow ай the IC's to operate within their absolute 
maximun temperature ratings 


1541 SINGLE DRIVE FLOPPY 
DISK MAINTENANCE MANUAL 
Ву Michael Peltier $29.95 

How 10 do your own maintenance, troubleshooting 
schematics, theory ot operation. cleaning hints, conver 
sion from one power source 1o another. calibration. Step- 
Dy-step instructions wil ead you through the proper 
methods to get your VIC-154 up and going again in a 
hurry. With the information furnished, almost any eperating 
elect can be cured. The manual contains three foldouts 
and over 110 ilustrations including. block diagrams. 
schematics, waveforms, interconnect diagrams, isometric 
(pictorial) views, and test point locators. With al these i 
lustrations and the detailed theory tor each circuit involv 
во, along with step-by-step procedures to follow, the 
‘manual is a great tme and money saver. The Maintenance 
Manual is а 81/2 by 11 and contains 198 pages, 


1541 MAINTENANCE GUIDE 
By Michael Peltier $9.95 

‘An abbreviated version of the maintenance manual 
Contains calibration (including head alignment) 
troubleshooting for the novice and schematics and parts 
layout 


ARD 101 ALIGNMENT 
REFERENCE DISK 515.95 


‘Contains traces written in specific locations to дме you 
а vety accurate reference when aligning your disk dive. 


THE VIDEO ENHANCER 529.95 
‘The VID-1 Video Enhancer will greatly improve the picture 
‘ual and readabiity o your non-Commodore monitor. The 
color iler switch reduces eye strain by adjusting те VID-1 
to alter the video signal. Picture quality is improved to the 
роп! comparable to the Commodore Color Montor instala 
tion is simple with по modification necessary 


VIDEO ENHANCER 519.95 
The VID-2 Video Enhancer wil greatly improve the ріс 
lure quality and readability о! your television set. Picture 
ualty is greatly improved over a set without the VID-2 
Installation is simple with no modification necessary 


THE LANGUAGE SERIES $39.95 

This program is а must for anyone learning, teaching 
or needing a refresher course іп French, German or 
Spanish. The user may choose the FLASH CARD TEST or. 
the MULTIPLE CHOICE TEST. With tne FLASH CARD TEST 


GOSUB of Slidell, Inc. 
P.O. Box 1781 
Slidell, LA 70459 
(504) 641-8307 


те user wil be able to set the length of me that words 
femain on the screen (25 settings). The MULTIPLE CHOICE 
TEST wil alow the usr to have toreiga words wih Engish. 
‘meanings or Engish words wih toren meanings. The user 
жй choose trom ast of Nive definitions, of which only one 
is corect Ай words реп are randomly generated trom 
а vocabulary of over 1000 words per language. The pro- 
gram wil quiz the student and grade the results, The 
teacher wil be able to generate a multiple choice quiz to 
те printer. The printed copy can be duplicated and 
distributed to the students as a test 


THE DEPRECIATER $19.95 
THE DEPRECIATER is used to depreciate equipment for 
"ux purposes. t cudes the folowing methods c depreca: 
поп, Straight Line, Double Decining, Sum of Year's Digits 
and Accelerated Cost Recovery System, Prints out a chart 
that ges you the beginning value, ending value. years 
depreciation and total depreciation AN output can go 10 
printer or sereen and can be saved to cisk it desired 


TEACHERS GRADEBOOK $39.95 

Teacher's Gradebook wil alow you to easily enter and 
‘ave all the grades tor upto nine classes. Each class may 
Contain up to torty students, wil alow up to rine weeks 
per cass. per student. You may have up to eight report 
periods per year. You wil be given a constantly updated 
grade average. by week and by subject lor each student 
You may also generate а class average, and a high/low 
grade average report. You may tell the computer he weight 
of each grade and the average wil тебесі that weight. AN 
reports may be sent to the screen or printer 


CHECKBOOK ANALYZER $24.95 

(Checkbook Analyzer is a menu driven checkbook pro 
gram which allows the user 10 keep a complete set of 
records of his checkbook lor an extended period o! time, 
For speed and ease of entry the function keys are used 
lor single key entry from each menu. A! tax deductibie 
"tems are earmarked Не use at tax time. Reports can be. 
generated giving toti expenditures or speci rems such 
эз food, clothing car expenses, deposits. service charges. 
ttc. Graphics include check, deposit sips ard service 
charges drawn on the screen wan the appropriate areas 
Ме out by the user. 


GRIDIRON STRATEGY 64 539.95 

Gear up for the season with GRIDIRON STRATEGY 64 
Version I. This а new updated version of our popular 
GRIDIRON STRATEGY 64. GRIDIRON STRATEGY 64 is a 
highly realistic simulation of football based on knowledge. 
and football instincts, NOT “joystick reflexes”. Most foot- 
Dall games let you contro a few players on a scrolling heid 
NOT GRIOIRON. In GRIDIRON, you coach the еліге team. 
апа the союг\ flc and stadium styled scoreboard are 
completely visible at эй times. Now, with our new screen 
graphs, you can read your opponents delense as they 
break from the huddle. Our new version now includes tour 
past Super Bowi champions or you can buy the Team Data 
Disk with ай of the NFL teams on it. The Team Data Disk 
‘can be updated every year, so you can constantly keep up 
withthe rise and fal of each team. 1 and 2 payer versions 
оп each disk 


TEAM DATA DISK 


514.95 


Payment in U.S. Dollars Only 
Shipping $3.00 
C.O.D. add 5200 
No C.O.D. outside U.S. 
Shipping to Canada $5.00 
All other countries $10.00 
Personal checks allow 2 weeks 

All orders MUST be paid for by check 
drawn on an American Bank or credit card. 


Reader Service No. 52 
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One especially nice dot com- 
mand is .BB (building block), 


This command lets the user string 


together a set of files in such a 


way as to create a new document, 


A letterhead and signature block 


need only take up a small amount 


of disk space. Instead of having 
these items take up space in even 
letter written, they can be given 
their own file names and stored 


y 


on the disk. By using .BB and the 


filename, the letterhead or signa- 
lure block can be inserted wher- 
ever needed using only a few 
characters of disk or tape space. 

Although they can be assigned 
in the print menu, some parame- 
ters are also dot assignable. Line 
spacing, left margin, text width, 
top and bottom margins, page 
length, and page numbering can 
all be set using dot commands. 
Adjusting them this way can be 
easier than changing the print 
menu. 


My own experiences with using 
the program have been positive. It 


has done everything it should. 
The printouts look good. For 


$39.95, the user definitely gets his 


money's worth. Recommending 


this program comes easy to me. А 


serious word processor, indeed. 

Cardco, Inc., 300 S. Topeka, 
Wichita, KS 67202 (phone: 316- 
267-3807). 


GRIDTRAP 
Livewire Software 
Commodore 64 
Disk, cassette; $24.95 

The last British invasion on 
American culture was led by the 
Beatles, 20 years ago. It drasti- 


— Cheryl Peterson 


cally changed the music American 


teens listened to. The present 
British invasion, of game soft- 


ware, has shown no potential for 


such standard-shifting: just good 


old games in the good old Ameri- 


can mode. 


Continued on page 46 


mesital 


net. 


You read that right. A full 80 
column, 80 character-per-second, 
Commodore-compatible dot matrix 
thermal printer, complete (with a 
90 ft. paper roll, interface cable 
and power pack), ready-to-run— 
at 800 words per minute —for only 
$139.99. But your wallet isn't the 
only thing the HUSH 80 CD is 
compatible with. It's compatible 
with all Commodore models; 


$139?» 
зева 
SMALL ON PRICE. 


including the Commodore 64, the 
VIC 20, and the new Commodore 264. 

And you'll find the HUSH 80 CD 
printer is big on lots of small things 
too. It weighs about one-half the 
amount of it's nearest competitor 
(it's compact size fits conveniently 
into a briefcase). And it’s extremely 
quiet, with fewer working parts, 
which means less noise and less 
to go wrong. 


ERGO /улеп/ inc. 26254 Eden Landing Road, Hayward, CA 94545 


tp://www.ol 


Reader Service No. 34 


Ask your local computer store or 
dealer for the HUSH 80 CD today. 
And if he doesn't carry it, call us 
at 415/322-ERGO. And find out 
where to get the little printer that 
does the big jobs. 


HUSH 80.CD 


LESS PRICE, LESS NOISE, 
LESS SIZE. 


http://www.oldgamesitalia.net 


Making music was never this much fun. 


octave:4 
keyboard: os 
erase adsr 


Imagine yourself in a professional recording THE MELODIAN RHYTHMMASTER 
studio, manipulating richly musical software package starts with your own nat 
from any of sixteen different instruments. ural sense of rhythm. ..the building block of 
qe pee: music... and takes it to perfection. Meet the 
sitions, just like a recordi challenge of RhythmMaster as you learn 
ine starting as a novice and bec the basics of rhythm and pitch, Track your 

progress until you make it all the way to 


unds 


musical master. Now the f 


ture of musical 


entertainment is as close as your home com. Б = - Cw 

puter. .. Introducing MELODIAN ZH HT TTWRVA WA AFFORDABLE BREAKTHROUGH 

THE COMMODORE-64~ COMPATIBLE — mm TECHNOLOGY...ONLY $199.90. The 

MELODIAN KEYBOARD plugs right into — MELODIAN system is the result of break 
through computer design innovations, in 


THE MELODIAN CONCERTMASTER vented by the same team who developed 
software package allows you to record and high-tech music systems for recording 
" vfessional superstars, That's why for less than $200, 

downthebasstrack уои can start with, the Melodian Keyboard 


and ConcertMastet and start making music 
right away. RhythmMaster can be added 


t. Then ad 
or woodwinds. Expe 


MELODIAN'S unique ADSR synthesizer | for only $39.95. And other exciting pre 
your home computer...and then the fun be indow tc n your own nev recorded programs will be available soon. 
gins. The menu driven display screen |, nent sounds...and before you know MELODIAN products are available at 
you experiment with infinite varieties of in е а completely new musical ar- — computer and music stores. Or you can call 
Strumentation and orchestration all with rangement. Or you can study the intricacies Melodian directly at 1-800-MELODIA and 
only four simple command keys. And the of prerecorded musical pieces, note for note | charge it on all major credit cards. All 
colorful ndly graphics invite you to rearrange them to your hearts Melodian products have a 15 day money- 


learn the basics of music back guarantet 


MAJOR CREDIT CARDS 
ACCEPTED 
1984 Melodian Inc. 
АП rights reserved. 285 : $2 23883 "7067 3° 385 33 ЕН 


The new, fun way to learn, play and compose music. 


tp;//www.oldgamesitalia.ne! siege http://www.oldgamesitalia.net/ 


CALL 1-800-MELODIA 
IN NEW YORK STATE CALL 
COLLECT 1-212-513-7330 


hen the Commodore 64 is turned оп, 
the programming language available to 
the user is BASIC. While most users 
will be content with the status quo, 

for many the question of “what else?” will aris 

This event will come to pass for even the most mild- 

ly dedicated programmers for several possible rea- 

sons. It may simply be curiosity about some of those 

other high level programming languages. 

it is a mastery of BASIC hat initiates the urge for 

somethin; 

In the 


schools throughout the country, Pa 

guage of choice for educators. The ability to practice 
on your own machine, whenever you like, is a pow- 
erful motivator. 

KMMM Pascal by Wilserv Industries has been 
available for the PET computers, and more recently 
for the Commodore 64. It is a fine product, well 
worth its $99 retail price. KMMM Pascal is well 
known within the PET community. The general lack 
of promotional activity, and some modesty on the 
part of the developer, have kept KMMM Pascal in 
the background for recent Commodore 64 devotees. 


By Morton Kevelson 


Pitseus meten esee" — http//www.oldgamesitalia.net/ 


ABOUT PASCAL 

Though we do not have the space to provide a tu- 
torial on Pascal, we will mention some of the lan- 
guage's salient features. It is a structured language. 
This means that Pascal programs are written in logi- 
cally contained units known as procedures. These 
procedures act as building blocks, being called by 
the main program as needed. Although the GOTO 
command is available, its use is somewhat restricted 
and actively discouraged. In comparison, GOTOs in 
BASIC will at times hopelessly tangle the logic of a 
program. Variables must also be systematically de- 
fined, in comparison to BASIC’s willy nilly assign- 
ments. These rules may seem restrictive at first. 
Their usefulness becomes apparent with experience. 

Pascal, which was originally developed by Niklaus 
Wirth, has been standardized to some extent by The 
Pascal User Manual and Report by K. Jensen and 
N. Wirth (Springer-Verlag). It has achieved favor 
among educators in that it promotes good program- 
ming habits—although, some users point out, its 
structured nature makes it easy to grade. The end 
result is the same. 


FEATURES OF KMMM PASCAL 

KMMM Pascal is a subset of Jensen and Wirth 
Pascal with extensions. It is not our intent to report 
on all these details at this time. For those readers 
who are familiar with or have worked with Pascal, 
we have provided a complete table of all of KMMM 
Pascal's reserved words and pre-defined identifiers. 
Take careful note of the footnotes in the table. These 
indicate the features of “Standard Pascal” not pres- 
ently supported by KMMM Pascal. We have also 
marked those features of KMMM Pascal which are 
extensions to the standard. 

We must also emphasize that KMMM Pascal is a 
dynamic package, fully supported by its developer. 
This means that upgrades are regularly issued. We 
first became acquainted with Version IV.1 of KMMM 
Pascal just about a year ago. This report is based on 
version IV.6B. In the course of these revisions, sev- 
eral of the missing standard features were imple- 
mented. A number of extensions were added, several 
old "bugs" were eliminated, and some new ones 
were discovered and subsequently swatted. It is like- 
ly, given the normal publication delays, that this ver- 
sion of KMMM Pascal will be obsolete by the time 
you read this. Some of the shortcomings in the table 
will most likely be eliminated. In all probability, a 
number of extensions will have been added. 

Upgrades are offered by mail to all registered us- 
ers. Although the upgrade fee may be as high as 
$7.50, all the upgrades we have received have been 
for a very nominal $1.00 if we supplied our own 
disk, $300 without our own disk. Be sure to return 
your registration certificate. This is one package 
where registration really means something. Do take 
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advantage of the $2.00 incentive to register your 
package. For this nominal fee, you will receive a 
disk full of KMMM Pascal demonstration programs 
submitted by other users. 

The output of KMMM Pascal is fully compiled. 
The resulting file is 100% 6502 machine code, with 
the exception of the initiating line number and SYS 
command. The programs produced by KMMM Pas- 
cal can be loaded and saved the same as any other 
BASIC program. The programs will run completely 
independent of the rest of the KMMM Pascal 
package. 

The package consists of three major components, 
the Editor/Compiler, the Compiler, and the Transla- 
tor. Their use may seem a bit cumbersome at first, 
especially when compared to the operation of BASIC. 
This is somewhat deceptive, as a little familiarity 
with the system will overcome most inhibitions. We 
will now briefly describe the operation of each com- 
ponent and their interactions. 


THE EDITOR/COMPILER 

Unlike BASIC, there are no line numbers in a 
Pascal program. Instead, a Pascal program is written 
very much like any other text. Of course there are 
rules for proper syntax which must be followed. The 
Editor/Compiler is nothing more than a custom word 
processor for the creation of KMMM Pascal source 
files. It has two different modes of operation. 

The command mode is primarily intended for the 
maintenance and creation of KMMM Pascal disk and 
tape files. The operation seems a little strange at 
first. However, with familiarity, the command se- 
quences become very logical and convenient. The 
first operation is to define a control character, The 
British Pound symbol (£) is recommended, The con- 
trol character is used to separate commands with two 
consecutive characters designating the end of a com- 
mand sequence. For example, the sequence: 


GRO: PLABEL£Y£GC£E 


would open a sequential file named “PLABEL” for 
reading, “Ү”апК the file from the disk into the text 
buffer and close the file. The command sequence 
would not be acted on until the second consecutive £ 
symbol was typed. 

In a similar fashion, there are commands which 
allow the creation of new text files as well as editing 
of existing text files. The latter are rather cumber- 
some. For this reason, the second Editor mode is 
provided. 

In the window, all the facilities of the Commodore 
full screen editor are available. Simply position the 
cursor anywhere on the screen using the cursor con- 
trol keys and bang away. The INST/DEL key func- 
tions as expected. In addition, the function keys are 
enabled to perform insertion and deletion of lines as 


well as activating an insert mode. 

KMMM Pascal is а compiled language. With one 
exception, there is no way to write some code and 
immediately test it as with BASIC. When the Com- 
piler portion of the Editor/Compiler is executed, the 
Pascal source file in the buffer is checked for syntax 
errors. Corrections can be made immediately after- 
wards. Operational testing of the program still re- 
quires full compilation. 

An abbreviated version of the Editor without the 
Compiler is provided. This version lacks the syntax 
checking feature but takes up less space in the com- 
puter's memory. This allows longer source files to be 
created. 


THE COMPILER 

Once a KMMM Pascal source file is created and 
saved to disk, the Compiler is invoked. The compil- 
ation process reads the selected source file, checks 
for syntax errors, and generates an intermediate p- 
code which is left in the computer's memory. Ver- 
sion IV.6B has the option to save the p-code to dis! 
but the package has no way to work with the resul- 
tant file. Future updates can be expected to include 
this feature. 


THE TRANSLATOR 

The final step in the process involves the Transla- 
tor. This can be loaded and executed by the Compil- 
er when its job is done. The Translator converts the 
p-code stored in RAM into object code, or 6502 
machine code, for direct execution. Upon comple- 
tion, the user is left with a fully compiled machine 
language program in RAM. This can be SAVEd, 
LOADed, and RUN just like any other program. An 
eight-kilobyte run time package, which is appended 
to the resultant code, becomes a part of the final 
program, Thus fully compiled KMMM Pascal pro- 
grams can be created and distributed within the 
package’s copyright agreement. When a compiled 
program is RUN, a message briefly appears indicat- 
ing the Wilserv copyright to the run time package. 


THE USER MANUAL 

This is the weakest link in the entire package. The 
manual is supplied in two main parts: the Compiler/ 
Translator Reference Manual and the Editor Refer- 
ence Manual. The basic manual actually applies to 
version Ш.9 of KMMM Pascal. A Version IV.1 Up- 
grade manual is appended to the package. To further 
add to the confusion is a rather lengthy Errata file 
on the disk. This documents all changes and modifi- 
cations since the release of version IV.1. An Adden- 
dum file on the disk lists all extensions added to 
KMMM Pascal since the Upgrade Manual. Both of 
these files have the effect of modifying both the Ref- 
erence Manuals and the Upgrade Manual. 

Fortunately, the manual is in the process of being 


http: 


revised. An integrated version should be available by 
the time this report is published. 

The present manual is not for beginners. Even 
though a comprehensive tutorial is given, the novice 
will have to spend some time carefully trying out the 
procedures. You will not be able to learn Pascal 
from the manual. All Pascal discussions deal with 
the unique features of KMMM Pascal as compared 
to the standard Pascal. (Several Pascal reference 
books are listed in the manual, as well as at the end 
of this report.) 


THE USER LIBRARY 

Several KMMM Pascal demonstration programs 
are provided with the distribution diskette. Additional 
programs are on the User Library, which you will 
receive when the registration form is returned. These 
files have to be compiled and translated before they 
can be RUN. By all means do so. These programs 
include a number of useful utilities as well as dem- 
onstrating the implementation and extensions unique 
to KMMM Pascal. The programs actually form part 
of the documentation supplied with the package. 


ADDITIONAL FEATURES 

Several utilities are provided on the distribution 
disk. Among these is a custom version of the DOS 
wedge. Support is also provided for the MSD CIE 


1 (60,000 
COMAL USERS! 


YOU ARE INVITED TO JOIN THEM 


COMAL STARTER KIT for Commodore 64” 
INCLUDES EVERYTHING YOU NEED: 


* Complete Enhanced COMAL 0.14 System 
LOGO" Turtle Graphics 
Graphics and Sprite Commanas 
Run-time Compiler for FAST execution 

* Two Different Unprotected Disks 

* Dozens of Sample Programs 
(Graphics, Sound, Utilities, Demo) 

+ Help Files / Error File. 

* Interactive Graphics Reference System 

* Users Manual: COMAL FROM A TO Z 

* Pocket Quickguide Reference Card 

* COMAL Information Package 

* COMAL Resource Listing 

* COMAL Stickers 

+ Disk Backup Program. 

* White Custom Molded Case 


ALL FOR ONLY $29.95 
14555 value—nearly У; price) 
Requires disk drive Compatible with MSD and Commodore arives 


Also available COMAL TODAY newsletter $14 95 per year « Sample 
COMAL TODAY $2 + COMAL Handbook $18 95 * Beginning COMAL 51995 
+ Foundations in Computer Studies With COMAL $19 95 • Structured 
Programming With COMAL 52495 


Sena check or Money Order in US Dollars plus $2 handling to: 
COMAL USERS GROUP, U.S.A., LIMITED 
5501 Groveland Ter, Madison, WI 53716 
phone: (608) 222-4432 


соттовоге 6a a trademark of Commogore Electronics ita 


AHOY! 
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IEEE-488 interface. Using this interface with an 
IEEE-488 disk drive, such as the CBM 4040 or the 
MSD SD-2, can more than double the speed of disk 
operations. 

The package includes a “security key” to prevent 
unauthorized distribution of the program. This limits 
the use of the package to one computer at a time. 
The security key, which plugs into the cassette port, 
must be present for operation of the Compiler. All 
other parts of the package, including the run time li- 
brary, will function without the security key. The 
cassette port connector is extended by the security 
key to allow simultaneous operation of a cassette re- 
corder. 


CONCLUSIONS 

KMMM Pascal is a comprehensive implementation 
of "Standard Pascal" with extensions, for the Com- 
modore 64 and PET computers. User support with 
regular upgrades is excellent. Students of Pascal 
should find KMMM Pascal quite sufficient for their 
needs. 

The fully compiled output of the package will run 
‘several times faster than equivalent programs written 
in BASIC. The inclusion of the stand-alone run time 
library will be of interest to software developers. 


KMMM Pascal 

Wilserv Industries 

PO, Box 456 

Bellmawr, New Jersey 08031 
(609) 227-8696 


REFERENCES 

1. Pascal For BASIC Programmers, Charles Seiter/ 
Robert Weiss. Addison Wesley, $10.95. 

2. Introduction to Pascal Including UCSD Pascal, 


Rodney Zaks. Sybex, $16.95. 
KMM PASCAL RESERVED WORDS 


AND END NIL SHL« 
ARRAY FILE NOT SHR+ 
BEGIN FOR OF THEN 
CALL+ FUNCTION OR то 
САЅЕ бото” PACKED TYPE 
CONST IF PROCEDURE UNTIL 
ом IN PROGRAM МАЯ 
DO LABEL RECORD WHILE 
DOWNTO МЕМ + REPEAT WITH* 
ELSE MOD SET (1) 
PREDEFINED IDENTIFIERS 
CONSTANTS: 
FALSE TRUE MAXINT 
TYPES: 
BOOLEAN | INTEGER STRING « TEXT 
CHAR REAL 
FUNCTIONS: 
ABS EOF MIDSTR + RND« 
ANDB + EOLN NOTB « ROUND 
ARCTAN EXP. ODD SIN 
CHR GETKEY + ORB + SOR 
СОМСАТ + INKEY + ORD SORT 
COPY + LEFTSTR+ | POS- SUCC 
cos LENGTH « PRED TRUNC 
DELETE + LN RIGHTSTR + 
PROCEDURES: 
CLOSE + PACK* READLN UNPACK* 
EXIT+ РАСЕ" RENAME” WRITE 
ERASE + PUT RESET WRITELN 
NEW READ REWRITE 
FILES: 
INUPT OUTPUT 


* Not implemented in version IV6B 
+ KMMM Pascal extension to standard Pascal 
1 Recognized but not implemented 


REVIEWS 


Continued from page 40 

Gridtrap is the best of three 
Livewire releases made available 
in this country by 3R. It offers no 
substantial twist on the maze 
game theme. But if maze games 
happen to be your cup of high 
tea, Gridtrap can hold its own 
with most. 

The graphics are simple: a 150- 
box (10 X 15) grid which Mr. 
Livewire travels across, erasing 
boxes as he goes. The goal is to 
defuse time bombs that appear 
onscreen with a 30-second fuse. 
As soon as Mr. Livewire defuses 
one (by stepping on it—let's see 
the bomb squad try that) another 
appears, up to five. If the count- 
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down reaches 15, a second bomb 
appears onscreen simultaneously 
with the first. 

You'll have plenty of time to 
reach the bombs if you utilize 
your ability to scroll Mr. Live- 
wire off the left of the grid and 
back on the right, or off the top 
and on the bottom, and vice ver- 
sa, vice versa. Boots appear on- 
screen which can stomp Mr. 
Livewire, but they don't chase 
him very actively at the lower 
levels. Skulls, deadly to the 
touch, occupy some squares, but 
they stay put and can easily be 
avoided. Your main enemy is 
yourself, your main danger lying 
in erasing so many boxes in your 
travels that you find yourself un- 
able to reach a ticking bomb. 


Even then, you can scroll rows of 
boxes toward you, but occasion- 
ally you will reach an impasse. 

The game includes such touches 
as a pause feature and the ability 
to define your own keys for key- 
board play. If you want to skip 
entering your initials and seeing 
your place in the Hall of Fame 
after each round, tough. 

In its basic gameplay, Gridtrap 
is like many other maze games. 
Unlike many other maze games, 
it has wit, requires strategy, and 
reflects some care on the part of 
the designer. 

Livewire Software, c/o 3R Im- 
port and Export Corporation, 731 
James St., Suite 405, Syracuse, 
NY 13203 (phone: 315- 
475-2224). —Greg Fried 
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CREATING YOUR 


e Letter 


a 
7 1 housand Pictures 
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HE VIC AND 64 


FAST GRAPHICS WITH CUSTOM 
CHARACTER SETS 


hen you're creating a game that moves 

L^ Objects around on the screen, it's im- 

Á portant to make those objects look like 

something. If your game is to be 

memorable and fun to play, it must give the player 
an experience that can't be forgotten—and the single 
most powerful tool you have in creating such an ex- 
perience is the power of the computer to make pic- 
tures on the screen. 

But making pictures isn't as easy, unfortunately, as 
xeroxing something. You have to construct your vi: 
al images out of little dots of color on a television 
screen. Think of it—you have to account for every 
single one of the dots on the TV screen. That's a lot 
of dots. That's why graphics programming is usually 
regarded as advanced programming. 

One system for creating pictures is to use bit- 
mapped graphics—but on the VIC and 64, that 
means drawing all your pictures with machine lan- 
guage—or with endlessly slow PEEKs and POKEs. 

You can also create pictures with sprites (on the 
64)—and we will, a few months from now—but 
again, sprite movement requires either machine lan- 
guage ог PEEKs and POKEs, so that апу kind of 
speed is difficult. Wouldn't it be пісе if your compu- 
ter contained a set of hundreds of different building 
blocks that you could put together quickly on the 
screen to make many different pictures? 


BUILDING BLOCKS YOU 
DESIGN YOURSELF 

Good news. Your computer has exactly the set of 
building blocks you need. You can put the blocks to- 


gether to make pictures at machine language speed 
using the string functions and PRINT. When you 
power up your computer, all those blocks look like 
letters and numbers and symbols and graphics char- 
acters— but unlike the building blocks you played 
with as a kid, these blocks don't have to stay the 
same shape. You can mold them to any shape you 
like. 

Both the Commodore 64 and the VIC allow you 
10 create your own building blocks by redesigning 
the patterns of the character set. You can use this 
feature simply to make letters and numbers that have 
а different look from the built-in character set—that's 
what many word processors for the 64 do. 

However, there's no law that says the characters 
you create have to look like standard characters at 
all. Your computer doesn’t care if an A looks like an 
A. To the computer, the letter A is just ASCII code 
65, or screen code 1. No matter what shape you 
give to character 65, when the computer meets a 
command like PRINT “A’, it will put character 65 оп 
the screen by storing screen code 1 in screen memo- 
ry. If character 65 happens to look like a letter A, 
then that's good for the human being trying to read 
it; but it can look like a radish for all the computer 
cares. 

That means character 65 can be part of a castle 
wall, or part of a boat, or an entire spaceship, or an 
animal, or a little human figure. And when you use 
animation techniques to move characters around the 
screen, the player of your game will see the picture, 
not the letter A. 

If you've been following this series from the be- 
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ginning, you'll remember that іп an early article we 
already used custom characters. We have moved 
boats back and forth across the screen in a harbor, 
and even though the computer thought it was 
PRINTing strings like "ABC" and "DEF", what the 
player saw was ocean liners and little launches, light- 
houses and harbor buoys. However, I offered no ex- 
planation at the time— because custom characters re- 
quire an entire article to explain. This is the article. 

At the end of this article, aiter all the explanations 
are over, there is a program that loads a group of 
custom characters into memory and loads them into 
strings, so you can PRINT them on the screen any- 
where you want. The different objects won't all make 
sense together, but it will give you a chance to see 
how custom characters can be used to create figures 
and background displays. And you can replace any 
of my characters with characters you design yourself, 
using the techniques in this article. 


THE SHAPE OF A CHARACTER 

If you look closely at your television or monitor, 
you can see that the letters are composed of little 
dots. To save you from developing eyestrain, I won't 
ask you to count them. 

Each character on the screen is composed of 64 
dots on an 8 by 8 matrix. That means that there are 
eight rows composed of eight dots each. The dots 
are slightly higher than they are wide, so that in- 
stead of forming a square, the character matrix is a 
tall rectangle. 

Each dot in the character can display one of two 
possible colors—the background color and the fore- 
ground color. The background color is the same for 
the whole screen, and consists of the color stored at 
location 53281. The foreground color can be selected 
individually for each character, and the color data is 
stored in color memory. 

When your computer powers up, the background 
color is dark blue and the foreground color is light 
blue. So the character matrix for, let's say, the letter 
I might look like this, with X's representing dots of 
foreground color and hyphens representing dots of 
background color: 


Notice that this character shape leaves blank rows 
at the top and bottom, and blank columns to the left 
and right. This is because each character needs to be 
clearly distinct from the character next to it. The 
computer doesn't leave spaces between character 
shapes—the characters run right into each other. If 
the character shape doesn't provide for blank space 
between letters, there won't be any, and goodbye 
legibility! 

However, when you're designing your own charac- 
ter shapes, you may actually want the shapes to run 
together. For instance, you may want to design a 
ship that is wider than a narrow character matrix 
will allow. So you can design the shape in two char- 
acters, and then PRINT them side by side on the 
screen: 


Individually, these shapes would mean nothing. To- 
gether, though, they make a picture. And because 
there are no blank lines between the two halves of 
the shape, they combine on the screen into a single 
continuous image. 

Together, then, these two characters combine to 
make a single complex character. Within a program, 
you would link these characters in a single string, to 
be PRINTed together on the screen. If the left side 
of the ship had taken the place of “А” and the right 
side of the ship had taken the place of “В”, then you 
would create a string variable like this: 


AS="AB" 


Once this command was executed, whenever you 
issued the command PRINT AS, the string “AB” 
would be placed on the screen—only instead of see- 
ing AB, you'd see the ship. 

You might notice that in designing this character I 
left a blank row at the top and bottom of the charac- 
ters, and a blank column on the rightmost edge of 
the righthand character. This means that if two of 
these complex characters were PRINTed next to each 
other or one above the other, there would be a space 
between the ships. 

So it's as important to plan how the character 
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shapes will combine with each other оп the screen 
as to plan the shape within the character matrix. 


FROM SHAPES TO NUMBERS 

How do we get our shape designs into the compu- 
ter? After all, computers only work with numbers, 
not pictures. 

It is not just a coincidence that each row in the 
character matrix has eight dots, and each byte in 
memory has eight bits. The character set is stored in 
memory in the same order as the screen character 
codes (not the ASCII codes). That is, the first cha 
acter is @, which has a screen code of 0; the sec- 
ond character is A, with a screen code of 1; then B 
(2), С (3), and so оп up to screen code 255, which 
is the reverse-video pattern of screen code 127. 

Each character matrix consists of eight rows of 
eight dots, so to contain the pattern in memory re- 
quires eight bytes of eight bits each. Therefore the 
character set takes eight bytes for each of 256 char- 
acters (0-255), for a total of 2048 bytes. 

You с ays find the pattern for any character 
if you know the character’s screen code and the 
starting address of character memory. Let's say that 
character memory starts at location 14336. We want 
to find the pattern for the letter M. The screen code 
of M is 13. So the pattern for M begins at 8*13 
bytes (104 bytes) from the start of с ter memory. 

To find the pattern—if character memory begins at 
14336—we could use this program line. 


РТ-14336%8%13 


The variable PT now holds the address of the first 
byte of the character pattern for the character “М”. 
That byte will hold the pattern for the top row of the 
character. PT+1 holds the pattern of dots for the sec- 
ond row of the character, and PT+2 holds the pat- 
tern for the third row. The last, or eighth row, is 
contained in byte PT+7. The next character pattern, 
for the character “N”, begins at PT+8. 

How do we convert dots into numbers that can be 
POKEzd into character memory? 

Let's start with the left side of the ship pattern we 


made. 
2------XX 
------ХХ 
----ХХХХ 
XXXXX-X- 
-XXXXXXX 
--XXXXXX 
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Each hyphen, which represents the background col- 
or, becomes a 0, and each dot of foreground color 
(X) becomes a 1: 


00000000 
000000 


1 
0707070 OLT 
САО Р 
Ж ы р ш.) 
OGM a Че TO ol 
ORG. I30 D DOPO 


These are now eight bytes, or eight numbers in bi- 
nary notation. This is what the computer actually 
sees when it PEEKs at bytes in memories— rows of 
ones and zeroes. 

However, BASIC works with decimal numbers, not 
binary numbers, so we need to convert each byte in 
the pattern to a decimal number in order to POKE it 
into memory 

Binary bytes, like decimal numbers, are set up 
with the highest value on the left and the lowest val- 
ue on the right. Just as in the number 321 the 3 rep- 
resents hundreds, the 2 represents tens, and the 1 
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The INCREDIBLE MUSICAL REYBORRD" 


transforms your computer into an 
exciting musical instrument. 


The Incredible Musical Keyboard 
can do more than turn your 
Commodore into a music 
synthesizer. 


Deep within every Commodore 64 lurks the 
unexpected. A versatile music synthesizer. A 
music video machine. A three track recorder. 
And а way to create music that's so easy 
you'll be playing songs within minutes. 


Just place the Incredible Musical Keyboard 
over the computer keyboard, load the 
included music software diskette, and you 
have all you need to make piano, guitar, 
synthesizer and electronic sounds. 


Everything you need to create 
music is included . . . whether 
you're a beginner or ап 
accomplished musician. 


It you can press а few keys, you have all the 
skills it takes to create and play music with 
the Incredible Musical Keyboard. 


Just beginning? Attach the included ABC key 
stickers to the keys and match the letter in 
the note with the letter on the key and 
PRESTO! . . . you're playing music instantly 
It's easy. It's fun. It unleashes the music іп 
you ...even if you don't read music. 


SGH 


You already read music? Great! We've 
included a Melody Chord Songbook featuring 
hits from today's top recording artists. Or 
play songs from your own sheet music. 


The Incredible Musical Keyboard 
works with other exciting Sight & 
Sound Music Software programs, 
too! 


Get the KAWASAKI SYNTHESIZER and 
transform your Commodore 64 into a 
sophisticated music synthesizer and sound 
processor. With one keystroke, you can 
control waveforms, vibrato, sweep and other 
special effects. Let your imagination soar 
with the KAWASAKI RHYTHM ROCKER 
creating and recording your own songs while 
you contral eye-popping color graphics that 
explode across the screen. Create your 
‘own music with the MUSIC 
PROCESSOR, a word processor 

for music. Then record it, edit it 

and play it back. Use the 99 preset 
instrument and special effects 
sounds for endless new creations. Or 
travel through a complete tutorial on 
music synthesis with the newest Sight & 
Sound music program, 3001 SOUND. 


ODYSSEY. After you've learned the basics of 


music synthesis, you can use the complex 
music synthesizer included in the program 10 


compose your own music, create your own 
sound effects or simply experiment with the 
hundreds of pre-programmed sounds. 


From the Incredible Musical 
keyboard to software that plays 
your favorite hits, we've got them 
all. 


Look for the Incredible Musical Keyboard and 
the complete line of Sight & Sound music 
software at your local computer software 
outlets and music stores. And unleash the 
music in you. 
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represents ones, so in binary notation the leftmost bit 
is the highest number and the rightmost bit is the 
lowest number. 

In binary notation, the rightmost or lowest bit rep- 
resents 1. This means that if the bit is on, or con- 
tains a 1, then the bit has a value of 1. If the bit is 
off, then it has a value of 0. Each bit to the left is 
double the value of the bit to the right of it, like this: 


128 64 32 16 8 4 2 1 


To calculate a decimal value, add the values of the 
bits that are on (1) and simply ignore the bits that 
are off (0). Here is the eight-byte pattern for the left 
side of the ship. Below each digit of the binary 
number is the decimal value of that digit. Then, to 
the right, you'll find the sum of the values of the 
digits—which is the decimal value of that byte. If 
you POKE that decimal number into memory, the 
computer will find that binary row of zeroes and 
ones: 


binary numbers decimalvalue 


О ug A Уй gg б 


no bits on 0 

0 0 0 0 0 0 1 1 
2 19 

DO) (0 Ж тй МПа ә 1 1 
2 +1 б 

0 0 0 0 1 1 1 1 
8 +4 +2 ы 15 

1 1 1 1 1 0 1 9 
128464 432 +16 +8 +2 250 

0 T 1 1 1 1 1 1 
64 432 416 +8 +4 +2 +1127 


0 0 1 1 1 1 1 1 


32 416 +8 +4 +2 +1 63 
0 0 0 0 0 0 0 [7] 
no bits on 0 


——————— 


These decimal numbers—0, 3, 3, 15, 250, 127, 63, 0 
—are the pattern for the left side of the ship. If we 
are putting this pattern in character memory in place 
of the character “М”, we could use this short 
program: 


10 CP-14336413*8 

20 FOR I=CP TO CP+7:READ A:POKE I 
,A:NEXT 

30 DATA 0,3,3,15,250,127,63,0 
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As you will see in the example program on page 
75, you can set up as many characters as you want— 
up to 256 of them—and POKE them into character 
memory. The only rule is that each character's pat- 
tern starts at charactermemory + 8 * screencode, 
and consists of eight bytes. 

You might also want to use a formula to determine 
the screen codes. This program does exactly what 
the above program did, except that you don't have to 
figure out the screen code where you want to POKE 
the pattern. Now you decide which character you 
want the new pattern to replace. Then you begin the 
DATA statement with the character. The program 
automatically calculates the screencode: 


10 CM-14:CS-CM*1024 

20 READ C$:C-ASC(C$):IF (C563 AND 
C496) OR (C>159 AND С<192) THEN 

C=C-64:GOTO 40 

30 ТЕ C>95 AND С<128 THEN С-С-32: 
GOTO 40 

40 СР-С5%8%С 

50 FOR І-СР ТО CP+7:READ A:POKE I 
,A:NEXT 

60 DATA М,0,3,3,15,250,127,63,0 


Because the DATA statement in line 60 begins 
with M, the program will calculate the screen code 
of M (in lines 20 through 30) and set CP to the 
starting address of the pattern for that character. You 
could replace the M with any other non-inverse 
character, and it would then put the pattern in the 
place of the new character. (This formula doesn't 
handle inverse characters.) 

One thing to be careful about: If you POKE a 
new character pattern in place of the space character 
7) or CHR$(32), the whole screen will automati- 
cally be filled with that new character pattern. This 
is because a blank screen is filled with screen code 
32, the blank character, which normally consists en- 
tirely of zeroes. If you change it so that there are 
any ones in the binary pattern, those on bits will 
show up as foreground color dots, and instead of a 
blank screen, you'll get a very busy screen indeed. 


LOCATING CHARACTER MEMORY 

Even though we have designed some characters, 
translated them to binary and then decimal values, 
and POKEd them into memory, we still havent set 
up a new character set. 

That's because we have to tell the Commodore 64 
operating system where to find the new character 
memory. (The two computers handle video memory 
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completely differently; we'll start with 64 memory 
handling.) 

For video display, the Commodore 64 divides 
RAM into four sections, or blocks of 16K. The VIC 
II chip, which controls video іп the 64, can only 
read one of these blocks at a time. So all the infor- 
mation for video needs to be located in the same 
16K block of memory. 

When your Commodore 64 powers up, the VIC II 
assumes that the video block is the first 16K of 
memory, from address 0 to address 16383. Screen 
memory is at 1024, which is within this block. 
Character memory, however, is in the character 
ROM chip, which is at 53248. This is outside the 
video block, but that's OK—the Commodore 645 in- 
ternal hardware fools the VIC II into thinking that 
the ROM chip at 53248 is really at 4098—48K low- 
er in memory. You don't have to worry about that— 
whenever the Commodore 64 is taking its character 
set from character ROM, the operating system does 
all the housekeeping. 

However, you can't fool the operating system that 
way. You have to locate your custom character set 
within the video block. You definitely don’t want to 
put it at 4098, however, because then you'd have no 
room at all for your BASIC program. That's because 
the BASIC program also begins in that first 16K 
block of memory. So to save space for the BASIC 
program, you need to locate character memory as 
high as possible in the 16K video block. 

Character memory must begin on a 2K boundary. 
This is because a whole character set uses 2K. (The 
645 character ROM uses 4K, but that's because the 
built-in ROM contains two entire character sets—you 
flip back and forth between them when you press 
SHIFT-COMMODORE.) 

So your character set has to be located at 0*1024, 
21024, 4*1024, 6*1024, 8*1024, 10*1024, 12*1024, ог 
14*1024. (Remember that 1024 equals IK.) You cant 
put character memory at ОК or 2K because those 
address ranges are used by the operating system and 
your own BASIC program. In fact, to give yourself 
as much room as possible, you'll usually put it at 
14K, or 14*1024. 

In the above examples, that's where we did put 
character memory. 

Now that we've decided where to put our custom 
character set, we still have to tell the Commodore 64 
where to find character memory. We don't have to 
tell the operating system the exact address. All we 
have to tell the operating system is which 2K bound- 
ary the character set begins at: 0, 2, 4, 6, 8, 10, 12, 
or M. 


And the place where we POKE the character set 
starting boundary is location 53272. However, we 
cant just POKE 53272, 14. That same byte carries 
other information, so we only want to affect certain 
bits of the byte at 53272. This is the program line 
we use: 


POKE 53272, 
OR 14 


(PEEK(53272) AND 240) 


And there it is. Once that line is executed, the Com- 
modore 64 looks at the block from 14K to 16K to 
find the character set. If your character patterns are 
already there, then those patterns will appear on the 
screen when the correct characters are PRINTed. 

Changing character sets is an all-or-nothing propo- 
sition. If you change any character patterns, you 
have changed them all. What if you want to change 
only a few, and keep the rest of the letters and num- 
bers from the character set? For instance, what if 
you want to put your new characters into inverse 
character memory, screen codes 128 through 255, 
and still keep the full character set from 0 to 127? 

The only way to do that is to copy the part of 
character memory that you want to keep. Copying is 
a tricky operation, because you have to do some 
bank switching. And since this is a column on game 
programming, not high-level computer memory use, 
Tm not going to explain what you're doing. I'm just 
going to show you how to do it. This routine copies 
all the characters from 0 to 127 from character ROM 
to the МК block. 


400 POKE 56334,PEEK(56334)AND 254 
410 POKE 1, PEEK(1) AND 251 

420 СМ-14:С5-1024%СМ 

430 FOR І-0 TO 1023:POKE CS+I,PEE 
K(53248)+1:NEXT 

440 POKE 1,PEEK(1) OR 4 

450 POKE 56334,PEEK(56334) OR 1 


Then, when you've copied all the non-inverse 
characters from the character ROM to the 14K boun- 
dary, you do this: 


460 POKE 53272, (PEEK(53272)AND 24 
0) OR 14 


CHARACTER MEMORY IN THE VIC 

The VIC uses the same principle—a single POKE 
tells the computer where to find the character pat- 
terns. However, because the VIC is a bit more ec- 
centric in its memory handling, there are some addi- 
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tional limitations, especially with the unexpanded 
VIC. The code for the start of character memory is 
POKEd into location 36869 with this command: 


POKE 36869, PEEK(36869)AND 240 OR 
codenumber 


Character memory must start at one of the following 
eight addresses (each address is followed by the code 
for that location): 


32768 0 (ROM characters) 

33792 1 (ROM reversed characters) 

34816 2 (ROM SHIFT-COMMODORE characters) 

35840 3 (ROM reversed SHIFI-COMMODORE 
characters) 

4096 12 (custom characters) 

5120 13 (custom characters) 

6144 14 (custom characters) 

7168 15 (custom characters) 


Usually you will not need the entire 4K from 
4096 to 8192 for your custom characters—you can 
only use 2K of a character set at a time, anyway. 
And any space you use for your character set is 
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stolen from program space. So usually you will want 
to locate your character set at 6144 or 7168. If you 
need all 128 characters of the nonreversed character 
set, you must use 6144 in the unexpanded VIC. 
(However, if you need 64 or fewer characters, you 
can use 7168. In this case, though, you'll need to 
move screen memory, too. That's where things get 
complex—more complex than we have space for in 
this issue.) 


USING THE EXAMPLE PROGRAM 

The example program on page 75 sets up 32 cus- 
tom characters. You can use them like building 
blocks to make your own designs particularly the 
"brick" characters from A to G. Or you can use the 
predesigned complex characters that are loaded into 
the string array CCS (n). 

Once you have typed in the program and RUN it, 
if you are using the 64 version you will see a dis- 
play of custom characters and the key you must 
press to get each custom character. However, you 
must press CTRL-9 to get into reversed mode in or- 
der to get the custom characters. 

With the VIC version, you'll get a blank screen— 
but you don't have to switch to reversed characters. 
(In fact, pressing CTRL-9 on a 5K or 8K VIC will 
show you an ever-changing character set, since the 
character patterns will be read from screen memory, 
and every character you type changes both screen 
memory and character memory at the same time.) 

Whichever version of the program you're using, 
when you type the characters from A to Z and 1 to 
6 you'll get pieces of drawings. You can change the 
colors of the figures by pressing CTRL-I through 
CTRL7 or COMMODORE- through COMMO- 
DOREZ. And you can switch back to the regular 
character set at апу time by pressing CTRL-0. 

To get rid of the custom character set, just press 
RUN-STOP/RESTORE. 

In addition, if you press fl through f7, you'll get a 
display of the complex characters. Ocean ships and 
starships, a star base, a carriage, and а castle tower 
give you a few samples of what can be done with 
combinations of custom characters. 

Of course, my drawings aren't going to be much 
help for the particular needs of your game. To try 
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By Dale Rupert 


ach month, we'll present several challenges 
designed to toggle the bits in your cerebral 
random а‹ memory, We invite you to 
send your solutions to: 
Commodares, c/o Ahoy! 
PO. Box 723 
Bethel, CT 06801 
We will print and di: the cleverest, simplest, 
shortest, most interesting and/or most unusual solu- 
tions. Be sure to identify the name and number of 
the problems you are solving. Also show sample 
runs if possible, where appropriate. 
Your original programming problems would be 
equally welcome! 


Problem #12-1: Phone Fun 

Randy Barr of Liverpool, WV suggested this 
Commodare. Write a program for which you enter a 
phone number. The computer will print out all pos- 
sible combinations of the letters on the telephone 
dial which equal that phone number. For example, 
one of the results of entering 639-4663 would be 
NEW-HOME, a good number for a real estate bro- 
ker. We'll hold onto Randy's solution until we see 
some of yours. Thanks for a good idea, Randy. Be 
sure to send some of the best phone-words you come 
up with and indicate for whom they might be appro- 
priate. 


Problem #12-2: More Phone Fun 

We may as well challenge you with the obvious 
opposite of the previous problem. The user types a 
seven-letter phrase, and the computer responds with 
the corresponding telephone number. For example, if 
the user types “ALL AHOY”, the computer replies, 
255-2469". If the user types "QUICK OX" or 
other invalid letters, the computer responds, “I АМ 
SORRY, BUT WE CANNOT COMPLETE YOUR 
CALL AS DIALED” (or something equally clever). 


Problem #12-3: Letter Slalom 

Write the shortest program to slalom a letter diag- 
onally down the screen continuously. The letter starts 
at the upper left corner and glides diagonally down 
to the right side of the screen, At that point it re- 
verses direction and glides down to the left. always 


leaving a trail behind. Scrolling of the screen should 
make this sequence repeat indefinitely. 


Problem #12-4: Quick Hex 

Write the shortest program to compute the hexa- 
decimal equivalent of any number between 0 and 
65535, inclusive. For example, if the user types 
16383, the computer responds with 3FFF. 


This month we will look at readers’ solutions and 
comments to the July and August Commodares. Be- 
fore we begin, here is a quick tip from Greg George 
(Colchester, VT). He wrote in response to Michael 
Russell's request in the September Commodares for 
а way to make a line unlistable, Greg’s solution is to 
include a line just before the unlistable portion of the 
program consisting of REM (shift-L). Now when 
you try to list the program, everything up to the 
REM is listed, but the computer stops at the (shift-L) 
and g ?SYNTAX ERROR. The (shift-L) puts a 
code of 204 into memory which is an invalid token 
value. (See how the token evaluator program in this 
month's Rupert Report avoided the problem.) Can 
you figure out why such a program runs properly 
even though it can't be listed? Thanks, Greg. 

Several readers have done some serious analysis in 
response to Problem $74: Definite Ending which was 
submitted by Paul Dawson of Springhouse, PA. The 
problem is to write a one-line program which takes 
as long as possible to run. It must eventually end. 
and it must produce a continuously changing di: 
(not merely scrolling). Patrick Tornudd of Helsinl 
Finland submitted a program and analysis giving a 
duration of 2.9E+220 years. He used FOR-NEXT 
loops nested three deep, each running from 0 to A 
Or —A to A in steps of 2/A where А =17Е+38, the 
largest real value allowed. Unfortunately, as we dis- 
cussed last month and in August, such a program 
will never end because of the С-645 32-bit floating 
point precision. It just can't distinguish between two 
numbers that differ by only 8 or so, even 
though it can represent such small values. 

The situation is analogous to a ruler marked in 
tenths of a centimeter. It can measure something that 
is 100 thousand millionths of a centimeter long (0.1 
cm) but it certainly can't distinguish between two 
objects differing by only one millionth of a centime- 
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ter. 

This is all academic, as Patrick pointed out, since 
the remaining life expectancy of our sun is only 
2.5E+12 years! There is one more catch that Р.Е. 
Nimmo of Fenton, Michigan brought up—the prob- 
lem of energy. He claims that even if all the matter 
of the universe were converted to electrical energy 
(according to Е=тїс ^2), the 40-watt power supply 
of the C-64 would exhaust that entire supply in only 
2E+52 seconds. If you would like to refute or verify 
Mr. Nimmo's claim, be certain that you indicate all 
of your assumptions and calculations. We'll publish 
the results here. 

Douglas Underwood (Walla Walla, WA) nested six 
FOR-NEXT loops ranging from 0 to 4.29E9 which 
required 8.57Е48 years to finish. 

P.E. Nimmo also sent the following solution to 
Problem 874. (You must eliminate spaces and use 
abbreviations to type this into one line.) 


1 DIM C(80):FOR №1 TO 80:J=C(N)- 
I-(N=1) :I=J=64:C(N)=J+1*64:PRINTC 
HR$(J+32) ; :N=-N*(N<80-1) :NEXT 


What does this program do? It eventually prints 
out every possible 80-character combination of the 
64 characters with ASCII codes from 32 to 96. Р.Е. 
Nimmo estimates that it will take about 14Е+ 137 
years to finish. He also points out that every possi- 
ble one-line program will appear somewhere among 
the 64 to the 80th power output lines, and one of 
them will be the ultimate solution to Problem #7-1. 
So Mr. Nimmo may not have created the longest 
running program possible, but he wrote a program 
which will create it! Very impressive indeed! 

Bob DeVinney (Perry, NY), John Payson (Ft. At- 
kinson, WV), and S.J. Mills, Jr. (Mountainside, NJ) 
also submitted solutions to this problem. Solutions to 
other July Commodares were submitted by Randy 
Barr (Liverpool, WV) and Jesus Geliga (Aquadilla, 
PR). 

The shortest solution to Problem 48-3: Letter Fre- 
quency came from David Alan Wright (Middletown, 
CT). It is listed below. 


1 DIM J(90):INPUT A$:FOR I-1 TO L 
EN(A$):X-ASC(MID$(A$,I,1)) :J(X)= 
Ј(Х)+1:МЕХТ 

2 FOR 1=65 ТО 90:ІҒ Ј(І) THEN PRI 
NT CHR$(I)"-"J(I), 

3 МЕХТ 


Other readers with somewhat similar solutions іп- 
clude James R. Young (Grants, NM), Dave Antoni- 
son (Cambridge, ONT), Yonson Serrano (Castroville, 
CA), Tom Dean (Enfield, СТ), Michael Velez (La- 
combe, AB, Canada), and Jules Miller (Baltimore. 
MD). 


56 AHOY! 


Jim Brice (Anchorage, AK) used a GET statement 
as part of the main loop, so the user is not limited 
to typing only 80 characters. His program is listed 
below. 


19 DIM N(255) 


20 PRINT "TYPE A SENTENCE AND <RE 
TURN>" 

30 GET A$ :IF A$: THEN 30 

40 PRINT A$; 

50 IF A$=CHR$(13) THEN 80 

60 P=ASC(A$):N(P)=N(P)+1 

70 GOTO 30 

80 FOR I=32 ТО 255 

90 IF N(I)-0 THEN 110 


100 PRINT CHR$(I)"="N(I), 
110 NEXT I 


Many others submitted solutions to this problem 
and to Problem 88-2: Bug Eliminator, including 
Mike Brumit (Deer Park, TX), Doug Mataconia 
(Piscataway, NJ). Malcolm Davidson (Ransomville, 
NY), Martin Levinton (New Rochelle, NY), Adam 
i NY). J.L. Tyler (Rochester, IN). 
. СА). John Daugherty (Billings, 
Wid Frazier (Hudson, OH), Marcel J, Devoe 
(Peabody, MA), Bill Feyler (Pleasant Plain, OH), 
und Karl Steger (St. Louis, MO). 

Thanks also to Baertschi Christian of Ascona, 
Switzerland for the nice letter and solutions to the 
August Commodares. Ahoy! is far-reaching! 

Most Bug Eliminator solutions sequentially 
PEEKed into screen memory until the bug was 
found. Even though I tried to fix the bug in the 
problem last month, Michael Velez pointed out that 
the value of L is just one more than the position of 
the bug. You may eliminate the bug by POKEing 
into the L-I screen location even after homing the 
cursor, 

Not many people sent useful functions in response 
to Problem #8-4: Useful Functions. David Alan 
Wright (Middletown, CT) suggested the following 
function to return the number of minutes since TIS 
was set: 


1 DEF FNMIN(X)=VAL(TI$)/360 


He sent similar ones for seconds and hours. 

Sol Steinberg (Bellmawr, NJ) commented that it is 
possible to use functions on the right side of the def- 
inition of another function, for example: 


1 DEF FNA(X)=X*3.14159/180 
2 DEF FNB(X)=SIN(FNA(X)) 


The function FNB(X) will return the value of the 
sine of X where X is in degrees (rather than radi- 
Continued on page 98 
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Big Value, Small Price! 


Why is quality software so expensive? display and print disk directories, FAST! 
No wonder people keep asking that question — KWIK-LOAD! helps you save time, which is one of 
some of the most popular business the big reasons you bought your Commodore 64. 


packages cost $50, $100, $200, or mor 

Well, at DATAMO we not only 
asked the same question, we did 
something about solving the problem of 
over-priced software. We created 
KWIK-WARE!" at only $19.95 per 
package. 

KWIK-WARE! is an exciting new 
line of Commodore 64 software that 
includes KWIK-LOAD!* and 
1 well as other soon-to- 
be-released software products. 

KWIK-LOAD! is a menu-driven, disk 
utility program for the Commodore 1541 disk 
drive that allows you to load programs, save files, 
and copy disks over three times faster than with 
normal Commodore DOS! KWIK-LOAD! also lets 
you test the operating speed of your drive, edit 
information on disk by track or of the pri 
sector, rename files, delet At DATAMOST, we didn't just ask 


files, validate and format disks, (0) DATAMOS Т * why software is so expensive. We 
print out sectors Е did something about it. 
20660 Nordhoff St., Chatsworth, CA 91311 (818) 709-1202 


odore Business Machines, Inc. 
sed trademarks of DATAMOST, Inc 


And it costs only $19.95! 
KWIK-WRITE! is a full-featured wo 


functions of more costly word processors. It 

includes easy-to-use command menus and help 

screens, cut and paste, search and repli 

print preview, underlining, 

screen displays up to 132 characters wide, 
and more. 

KWIK-WRITE! supports most popular 

printers, loads and saves files fast with 

the help of built-in KWIK-LOADI, 

includes a KWIK-REFERENCE! card, 

and is compatible with other 
KWIK-WARE! products. 

Priced at just $19.95, KWIK- WRITE! 

delivers the quality and power of the most 

popular word processors, at a fraction 


тебі and 1541 are registered trademarks 
IK-WRITE!, and KWIK-WARE! жен 
Reader Service No. 44 
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BY 


t's a nice summer day and you de- 

cide that a backyard barbecue 

would be just the thing to put the 

family in a good mood. Later, 
while the hot dogs and hamburgers are 
slowly cooking, you have a chat with your 
neighbor, the real estate broker. While 
he’s mowing his lawn he tells you about 
some property he has that he wants to 
build on. If he could just find a contrac- 
tor he could trust he would be able to put 
up some houses and sell them to his си- 
tomers at a nice profit. “Үош wouldn't 
know a good contractor?" he asks. You 
think quickly. You've been out of work 
since March, when the butter churn fac- 
tory closed, and are getting low on cash. 
You then tell your neighbor that you 
would be glad to build those houses for 
him if you can agree on a fair price. He 
offers you $50000 for every house you 
can build and you meet in his office the 
next day to sign the papers. 

Contract in hand, your next stop is the 
bank where you take а $35,000 loan at 
12% interest with your own home as 

/ security. Unfortunately, the loan is only 


ВМВ 
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for 30 days, but you think you can have 
the first house finished and sold by that 
time. Now the only problem is the fact 
that the only house you ever built was a 
birdhouse, and even the birds won't touch 
it. Then you realize that you don't have to 
do the actual work yourself if you just 
hire experienced laborers. 

Offering $70 a day, you make the 
rounds of the local bars looking for any- 
one who knows which end of a nail you 
hit with a hammer. Soon you have enough 
people to build a small city. You explain 
what you're building and give a rousing 
speech (aided by several stiff shots and а 
couple dozen beers) and tell everyone to 
show up for work in the morning. 

The next morning when you get to the 
job site you find about 50 people waiting 
to work. You quickly come to the conclu- 
sion that you can only keep an eye on a 
maximum of 9 at a time. You tell the rest 
10 come back tomorrow, promising to hire 
new people every day. Taking your truck, 
you head to the local building supply to 
get your materials. 

Not knowing how much of anything to 
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buy you consult the plans for the house, but all you 
can understand is that you'll need about 25 windows, 
20 doors, and a garage door for each house. 

After buying what you hope will be enough mate- 
rials you chillingly remember that you told your 
workers that if at any time they ran out of materials 
they would be paid for the full day and sent home. 
With thoughts of living in a cave for the next 20 
years you head for the job and (you hope) success. 
NOTES: 

Since you can only hire one type of worker at a 
time (i.e., carpenters), when one type of job is fin- 
ished everyone goes home for the day. 

If you are fortunate enough to pay off your loan 
on time, you will be given the chance to borrow 
more money. Keep in mind that all loans are for 30 
days only. 

То make your planning easier I'll tell you now 
how the house will be built. 


TYPE OF 
JOB WORKER USED 

1, Foundation Bricklayer 
2. Frame * — Carpenter 
3. Roof Roofer 
4. Plumbing & Electric Utilityman 
5. Sides of House Carpenter 
6. Plaster Plasterer 
7. Windows Glazier 
8. Fence, Doors and 

Garage Door Carpenter 
9. Sidewalk Mason 
10. Painting Painter 


PLAYING TIPS 


l. Materials can be stolen overnight so try not to 
stockpile materials unless you can find a really 
good price. 

. Plumbing and wiring takes more than 150 man 
hours to complete. 

. A good bricklayer can do 100 bricks per hour. 

. Plastering takes more than 375 man hours to 
complete. 

. Try to judge how many hours work are left on a 

ordingly. 

ys try to buy materials for the lowest price 

le. 

Keeping track of materials used on your first 

house will make later houses easier. 

. The record for building one house is 23 days at a 
cost of $29,452.63. If you top that, drop me a 
line and let me know how you did it. 


Special thanks to my wife Marie who suggested 
the idea for this game, and did all the typing with- 
out getting a chance to play the game before it was 
sold. Love you honey. 

For a copy of this or any of my programs on cas- 
sette only, send a blank tape and a self-addressed 
stamped mailer with $5.00 and the program name to: 

B.W. Behling 
232 Jackson St. 
Brooklyn, N.Y. 11211 
Or order the Ahoy! program disk, containing all the 
programs in this issue. See page 66 for details. 
SEE PROGRAM LISTING ON PAGE 64 


COMMODORE OWNERS 
WE'LL FIX YOUR FILES WITH 


FANTASTIC FILER” 


The all purpose Data Base management 
system that provides: 


1.) Menu driven subsections 
2.) Logical key functions 
3.) Average of 1000 records per disk 
4.) Fast record access time 
5.) Search for records by ге 

) Search for records by record number or by specific 
6.) Easy to edit, delete or update records 


7.) Interface with FANTISTIC FORMS to print mail- 
ing labels or columnar reports 


8.) Complete reference manual 
9.) Technical support available to answer questions 
10.) Up to 255 characters per record and up to 15 fields 


FOR 


64 


All this for only 


829.95 
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PROGRAM LISTINGS 


As of last issue we began utilizing an improved method of printing our 
program listings. This new method will make entering programs easier for 
you, but only if you read this entire page carefully before proceeding. 


п the following pages you'll find several 
programs that you can enter on your 
Commodore computer. But before doing 
so, read this entire page carefully. 

To insure clear reproductions, Ahoy!’s program 
listings are generated on a daisy wheel printer, in- 
capable of printing the commands and graphic char- 
acters used in Commodore programs. These are 
therefore represented by various codes enclosed in 
brackets | |. For example: the SHIFT CLR/HOME 
command is represented onscreen by a heart Eg. 
The code we use in our listings is [CLEAR]. The 
chart below lists all such codes which you'll encoun- 
ter in our listings, except for one other special case. 

The other special case is the COMMODORE and 
SHIFT characters. On the front of most keys are two 
symbols. The symbol on the left is obtained Бу 
pressing that key while holding down the COMMO- 
DORE key; the symbol on the right, by pressing 
that key while holding down the SHIFT key. COM- 
MODORE and SHIFT characters are represented in 
our listings by a lower-case "s" or "c" followed by 
the symbol of the key you must hit. COMMODORE 


1, for example, is represented by [c J], and SHIFT J 
by [s J]. 

Additionally, any character that occurs more than 
two times in a row will be displayed by a coded list- 
ing. For example, [3 "[LEFT]"] would be 3 
CuRSoR left commands іп a row, [5 ЕР)”] 
would be 5 SHIFTed English Poun so on, 
Multiple blank spaces will be noted in similar fash- 
ion: 22 spaces, for example, as [22 “ 

Sometimes you'll find a program line that’s too 
long for the computer to accept (C-64 lines are a 
maximum of 80 characters, or 2 screen lines, long; 
VIC 20 lines, a maximum of 88 characters, or 4 
screen lines). To enter these lines, refer to the BASIC 
Command Abbreviations Appendix in your User 
Manual. 

On the next page you'll find our Bug Repellent 
programs for the VIC 20 and С-64. The version ap- 
propriate for your machine will help you proofread 
our programs after you type them. (Please note: the 
Bug Repellent Line Codes that follow each program 
listing should nor be typed in. See the instructions 
preceding each program.) C 


1t Means You Type will 
[CLEAR] Screen Clear SHIFT CLR/HOME 
HOME] Home CLR/HOME, 
UP] Cursor Up SHIFT $ CRSR+ 
[DOWN] Cursor Down 4 CRSR E 
[LEFT] Cursor Left SHIFT +CRSR=> 
RIGHT] Cursor Right =CRSR= 
551 Shifted Space SHIFT Space 
[INSERT] Insert SHIFT INSTIDEL 
DEL] Delete INSUDEL 
RVSON] Reverse On ENTRI. 9 
RVSOFF] асле Om Суг. 0 
[UPARROW] Up Arrow. + 
BACKARROW] Back Arrow - 
PI] Pr т 
ЕРІ English Pound P 
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You When 
I Se Yu See It Meany You 
E BLACK] Black emi E 
B [WHITE] White сән: [Bl 
E [RED] Red emu Ва 
m CYAN] Cyan. ores Ё 
W [PURPLE] Purple cwn: B 
Ш [GREEN] Gren om e E 
a BLUE] Blue ENTRI. 7 
Ш [YELLOW] лам omo M 
И [rJ Fonction 1 n 
F2] Function 2 sr on Ы 
F3] Function 3 3 
F4] Function 4 sur n Ж 
Ж [F5] Function 5 KS 
т Е61 Funetion 6 sur rs E 
Е Е71 Function 7 к MH 
[Е8] Function 8 sat v BM 
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IMPORTANT! “63007 DATA 32; 210, 255, 169, 0, 
Before typing in the Bug Repellent and other Ahoy! | 133, 253, 230, 254, 32 
programs, refer to the information on page 61. | • 63008 DATA 228, 3, 234, 165, 253, 
160, 9, 179, 177, 251 
+63009 DATA 201, 32, 240, 6, 138, 
113, 251, 69, 254, 170 


• 63010 DATA 138, 133, 253, 177, 25 
UG. REPELLE 1% 2085 226%4165:2252у 41 
UG Kleinert and David Barron * 63011 DATA 240, 74, 74, 74, 74, 2 


4, 105, 65, 32, 210 

EN ur 10 quickly debug , E ay м 

Uc oram you npe tn on your VIC 20, Flow directons pre 63012 DATA 255, 165, 253, 41, 15, 
cassette or disk. 24, 105, 65, 32, 210 

For cassette: type іп and save the Bug Repellent program, then , 63013 DATA 255, 169, 13, 32, 210, 
CREUSE USES сМ. If you пуре the 255. 173, 141, 2, 41 

rogram properly, it will generate а set of two-letter Іше ces — | 65011 DATA 1, 208, 249, 230, 63 

КЕШЕМ ose ёа below the program óu this pe: (f + ЖУН, , , 
you didn't type the program properly, of course, no line codes 208, 2, 230, 64, 230 

will be generated. You'll have to debug the Bug Repellent itself — «63015 DATA 251, 208, 2, 230, 252, 


(егі жау) king Bug Керей Vd 76, ЛА. З: 169) 236 
you've got а worl lent, type in the program с 0 2, 90226 
you wish to check. Save it and type the RUN and SYS com- * 63016 DATA, 180. зе, 7и 


mands then the li codes 
Ene шола ухх > 63017 ФАТА 205, 221, 169, 13, 32, 


‘ancy, a typing error exists in that line. Important: you must use 219, 255, 96, 230, 251 
exactly the same spacing as the program in the magazine. Due t0 e 63018 DATA 208, 2, 230, 252, 96, 
memory limitations on the VIC, the VIC Bug Repellent will 0-76; 7342. 78; 69 
register an error if your spacing varies from what's printed. Т 
КУ {ОО SVS E18 as maay tinot мї Jon wish, bot if you * 63019 DATA 83, 58, 32, 0, 76, 73, 
use. the cassette for anything, type RUN 63000 to restore the 78, 69, 32, 35 
Repellent, • 63020 DATA 32, 9, 0; 0, 0, 9 
_ When your program has been disinfected you may delete ай 
lines from 63000 on. (Be sure the program you type doesn't in- 
Че ic above 630001) н BUG REPELLENT LINE CODES 
RON NUN RETURN: (e above нде АРВ FOR VIC 20 BUG REPELLENT 
Керейепі on itself.) Type in the program you wish to check, then 5 E A 
БУЗ 378. Thi will generate a set of two ketier line codes that you LINE # OORA SHE КЕ ; See 
should compare to those listed in the magazine. LINE # 63001:Вр ШАО 
То pause the line codes listing, press SHIFT. To permanently LINE # 63002:Ғ0 LINE # 63013:EN 
pause it, press SHIFT LOCK. To continue, release SHIFT LOCK. ІЛМЕ # 63003:ND LINE # 63014:GJ 
То send the list to the printer type OPEN 44:CMD 4:SYS LINE # 63004:DJ LINE # 63015:IK 
MG ee LINE # 63005:LP LINE # 63016:HG 
i ^ LINE # 63006:JB LINE # 63017:CK 
“63000 FOR X = 828 TO 1023 :READ Y LINE # 63007:JF LINE # 63018:JF 
:РОКЕ X,Y:NEXT:END LINE # 63008:KA LINE # 63019:0H 
*63001 DATA 169, 0, 133, 63, 133, LINE # 63009:HP LINE # 63020:LH 
64, 165, 43, 133, 251 LINE # 63010:KJ LINES: 21 


*63002 DATA 165, 44, 133, 252, 160 


3:10, 132, 254, 32, 228 


*63003 DATA 3, 234, 177, 251, 208, 


21 26) 208, 3, 230 


«63004 DATA 251, 208, 2, 230, 252, 
169, 244, 160, 3, 32 PEL LENT 
i Davi 


+63005 DATA 30, 203, 160, 0, 177, 


ichael Kleinert an Barron 


251, 170, 230, 251, 208 


+63006 DATA 2, 230, 252, 177, 251, The program listed below will allow you to quickly debug any 


32, 205, 221, 169, 58 Ahoy! program you type in on your C-64. 
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Type іп, SAVE, and RUN the Bug Repellent, Туре NEW, 


then type in or LOAD the Ahoy! program you wish to check. © 5020 ў 
When thats done, SAVE your program (don't RUN it!) and oy Poe E 0:244 Ex 
type SYS 49152 [RETURN]. You'll be asked if you want the — 4502] DATA 63, 133, 64 133 
line value codes displayed on the screen or dumped to the , , , ‚ 2, 32 
printer. If you select screen, it will appear there. ‚ 189, 255, 32, 192 
The table will move quickly, too quickly for most mortals to “5022 DATA 255, 166, 254, 32, 201, 
follow. To pause the listing depress and hold the SHIFT key. To 255, 76, 73, 193, 96 
pause for an үа рө Cue КЫШ Aslongasit *5023 DATA 32, 210, 255, 173, 141, 
Е 022151, 1, 208, 249 
that follows the program you're entering: If you spot a diffe +5024 DATA 96, 32, 205, 189, 169, 
poder шешсін пик қалтасы 718) CYA ITI с cy 
tradictions occur, LIST each line, spot the errors, and correct them, — * 5025 DATA 204, 255, 169, 4, 76, 1 
95, 255, 147, 83, 67 
"5000 FOR X = 49152 TO 49488 :READ “5026 DATA 82, 69, 69, 78, 32, 79, 
Y:POKE X,Y:NEXT:END 82, 32, 80, 82 
*5001 DATA 32, 161, 192, 165, 43,  *5027 DATA 73, 78, 84, 69, 82, 32, 
1133/8251. 165,44, 133 825322709516 
45002 DATA 252, 160, 0, 132, 254, "5028 DATA 44, 193, 234, 177, 251, 
822712719222 238, 177 201, 32, 240, 6, 138 
*5003 DATA 251, 208, 3, 76, 138, 1 "5029 DATA 113, 251, 69, 254, 170, 
92, 230, 251, 208, 2 138, 76, 88, 192, 0 
“5004 DATA 230, 252, 76, 43, 192, “5030 DATA 0, 0, 0, 230, 251, 208, 
76, 734-278; (69, 32 2, 230, 252, 96 
“5005 DATA 35, 32, 0, 169, 35, 160 “5031 DATA 170, 177, 251, 201, 34, 
1211925132 80) 2391 208, 6; 165, 2; 13 
45006 DATA 160, 0, 177, 251, 170, “5032 DATA 255, 133, 2, 165, 2, 20 
230, 251, 208, 2, 230 8, 218, 177, 251, 201 
“5007 DATA 252, 177, 251, 32, 205, “5033 DATA 32, 208, 212, 198, 254, 
189, 169, 58, 32, 210 76, 29, 193, 0, 169 
©5008 DATA 255, 169, 0, 133, 253, “5034 DATA 13, 76, 210, 255, 0, 0, 
290; 254, 32, 37; 193 0 
+5009 DATA 234, 165, 253, 160, 0, 
76% 13, 193; 133, 253 
Е5010С0АТА 117; 251, 208, 237, 165 БЫС REPELIERN DEIN E ES 
18255 9 16 92009. 76218 2 
*5011 DATA 74, 74, 24, 105, 65, 32 ІЛМЕ # 5000:GJ LINE # 5018: ЕК 
12107255 01655253: LINE % 5001:DL LINE % 5019:FL 
*5012 DATA 41, 15, 24, 105, 65, 32 LINE % 5002:DB LINE # 5020:CL 
2-210, 425591695 13 LINE # 5003:0F LINE # 5021:GC 
«5013 DATA 32, 220, 192, 230, 63, LINE % 5004:KN LINE % 5022:NN 
208, 2, 230, 64, 230 LINE 4 LINE # 5023:NH 
45014 DATA 251, 208, 2, 230, 252, LINE # LINE # 5024:1M 
765211; 1927169; 153 LINE # LINE # 5025:КС 
“5015 DATA 160, 192, 32, 30, 171, LINE # LINE % 5026:DC 
166, 63, 165, 64, 76 LINE £ 5 LINE # 5027:ML 
*5016 DATA 231, 192, 96, 76, 73, 7 LINE % LINE # 5028:GN 
8, 69, 83, 58, 32 LINE £ LINE # 5029:JK 
*5017 DATA 0, 169, 247, 160, 192, LINE # LINE % 5030:NA 
3050305 171, 169, 3 LINE £ LINE # 5031:DM 
+5018 DATA 133, 254, 32, 228, 255, LINE # LINE # 5032:JA 
201, 83, 240, 6, 201 LINE £ LINE % 5033:FM 
*5019 DATA 80, 208, 245, 230, 254, LINE # LINE % 5034:PA 
827 210, 255, 169; 4 LINE # LINES: 35 
AHOY! 63 
http ww.oldgamesitalia.net, 
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CONSTRUCTION 


FROM PAGE 60 

+2 POKE53280,6:POKE53281,1:PRINT" 
[CLEAR][BLACK][4"[DOWN]"]";TAB(6 
ШЕСІ ШІ 

*4 PRINTTAB(6);"(4"#"[21" "[5"#"] 
5 


“6 PRINTTAB(6);"(4"#"[3" "]CONSTR 
UCTION CO. [4"#"]" 

*8 РКІМТТАВ(6); "[4"#"[21" "[5"#"] 
n 


“10 PRINTTAB(6);"[4"#" 

W.BEHLING[3" "[5"#"]" 

*12 PRINTTAB(6);"[4"#" 
т 


4" "]BY B. 
21" "[s"g" 
*14 PRINTTAB(6);"[4"$" 


IGHT 1984 [4"#"]" 
*16 РВІМТТАВ(6) ; "[4"#" 
1" 


(С) COPYR 
21" "[s"g" 


*18 PRINTTAB(6); "[28"4" ]" 
+20 PRINTTAB(9) ;" [7"[ DOWN]" ][ RVSO 
N][BLUE] HIT ANY KEY TO START [B 
LACK]" 
+22 GETK$:IFK$-""THEN22 
+24 PRINT"[UP] [RVSON] 
MANY HOUSES WILL YOU BUILD? 
5) [WHITE]" 

+26 GETK$:IFK$-" "THEN26 

+28 IFASC(K$)<490RASC(K$)>53THEN2 
6 


GREEN ]HOW 
а- 


“30 HN=VAL(K$):PRINT"[CLEAR]" 

«32 DIMMA(11,3),MA$(11,2):FORI-1T 
011:МА(1,3)-0:МЕХТІ 

“34 SC=1024:CL=55296:WP=70:DA=0:H 
0-1:СА-35000:1,4-35000%(35000%,12 
):LD-30 

*36 FORI-1TO11:READMA(I,1):READMA 
(I,2):NEXTI 

*38 FORA-1TO11:FORB-0TO2:READMA$( 
A,B):NEXTB:NEXTA 

“40 PRINT"[CLEAR]":POKE53280,4:PO 
KE53281,0:G0SUB100:GOSUB510:GOTO 
800 

“100 PRINT"[HOME]";TAB(27); [WHIT 
E][RVSON]DAY  HOURS":PRINT"[DOWN 
1"; TAB(27) ;DA; TAB(33) ; HC 

*102 PRINTTAB(27);"[RVSON][DOWN]$ 
"SCA:PRINTTAB(27) ; " [DOWN ]WORKERS 
"5WO:PRINTTAB(27) ;"[DOWN][RVSON] 
MATERIALS" 
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“104 PRINT:FORI-1TO11:PRINTTAB(27 
2:MA$(I,0);MA(I,3):NEXTI:RETURN 

*150 TR-TR-249:0NTRGOTO1660 

*152 IFDA-ITHENRETURN 

*154 MSG$=" YOUR MATERIALS WERE S 
TOLEN OVERNIGHT!!":GOSUB510 

*156 GOSUB500:PRINT"[HOME][9"[DOW 
N]"]":FORS-1TO11:PRINTTAB(33) ;"[ 
6" "у" 

*158 MA(S,3)-0:NEXTS:GOSUB100:GOS 
UB190:GOTO604 

“160 MSG$-"[UP] YOU WERE ARRESTED 
FOR BRIBING A ":GOSUB510:GOSUB5 
00 

“164 MSG$=" BUILDING INSPECTOR. М 
О WORK TODAY!":GOSUB500:GOSUBI190 
:60Т0600 

“190 FORD=1T02000:NEXTD: RETURN 

“200 DEFFNRN(VA)=(.91)*INT(RND(9) 
*VA) 

“202 ЕОКІ=1Т011:МА(І,0)=МА(І,1)+Е 
МЕМ(МА(1,2)) : МЕХТІ: ЕОКР=1Т011 

+204 PRINT"[HOME][20"[DOWN]"]" 

“206 ІЕМА(Р,0)<МА(Р,1)-((МА(Р,2)% 
.01)/2)THEN210 

*208 PRINT"[WHITE][RVSON]I HAVE " 
sMA$(P,1);" 6 $";MA(P,0) ;" [LEFT] 
":MAS(P,2):G0T0212 

-210 PRINT"[CYAN][RVSON]I HAVE "; 
MA$(P,1);" ON SALE 6 $";MA(P,0); 
"[LEFT] ";MA$(P,2) 

*212 INPUT"[WHITE][RVSON]HOW MANY 
DO YOU WANT";QU 

*214 IFQUXOTHENP-11:G0T0228 

“216 IFQU+MA(P,3)<=99999THEN220 

*218 М565-" YOU DON'T HAVE ROOM F 
OR THAT MUCH!! ":GOSUB519:GOSUB5 
00:G0T0224 

*220 IFQU*MA(P,0)«-CATHEN226 

*222 MSG$=" YOU CAN'T AFFORD THAT 
! ":GOSUB510:GOSUB500 

“224 GOSUB190:GOSUB510:G0TO204 

*226 MA(P,3)-MA(P,3)4QU: PP-MA(P, 
)*QU:CA-CA-PP:CA-.O1*INT(CA*100) 

*228 GOSUB350:GOSUB100:GOSUB510:N 
EXTP: RETURN 

+250 PRINT"[HOME][8"[DOWN]"]":FOR 
E-1TOM:PRINT:NEXTE 

*252 PRINTTAB(33);"[6" "]":GOSUBI 
00:ТЕМ=1ТНЕММ=2:6070250 

+254 HD-INT(HR/WO) : IFHD>HCTHENHC= 
HD:GOSUB100 

*256 IFHR<QTTHENRETURN 
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+258 HR=0:CA=CA-(70*WO):MSG$=" WO 
RK FINISHED FOR TODAY. CREW PAID 
.":6050В500 

+260 GOSUB350:GOSUB190:HC«0:GOSUB 
600: RETURN 

*300 MSG$-" HOW MUCH? 1-$15[3"0"] 
2-$3[4"0"] 3=$45[3"0"] ":GOSUBS 
00:1р=рА+30 

“302 GETK$:IFK$-""THEN302 

E IFASC(K$)«490RASC(K$)251THEN 
J 

“306 LA=15000*VAL(K$):CA=CA+LA:LA 
=LA+(LA*.12):GOSUB510 

+350 CA-.01*INT(CA*100) 

+352 PRINTCHR$(19);"[HOME][4" [DOW 
N]" JEWRHITE]"; TAB(27) ;"[12" "]";" 
[12"[LEFT]" ] [RVSON]$" ; CA: RETURN 

+400 MSG$=" YOU ARE BANKRUPT[4"I" 
] ":GOSUB500:GOSUB190 

+402 PRINT"[CLEAR][4"[DOWN]" ][ BLA 
CK]":POKE53281,1:6G0T0936 

*500 PRINT"[HOME][WHITE][RVSON][2 
2"[DOWN]" ]" ;MSG$ : RETURN 

“510 FORI-840T01000;POKESC*I,160: 
POKECL4I,5:NEXTI:RETURN 

*600 DA=DA+1:PRINT" [HOME ] [DOWN ] [ D 
OWN]";TAB(27);DA;TAB(33);HC 

“602 TR=INT(RND(0)*250)+1:IFTR>24 
ВТНЕМС0Т0150 

+604 GOSUB510:IFDA«»LDTHEN610 

+606 MSG$=" YOUR LOAN IS DUE TODA 
Y." :GOSUB500:GOSUB190:GOSUB510 

*608 CA=CA-LA:LA=0:LD=0:GOSUB350 

*610 IFCA<=0THENGOTO400 

*612 IFLA<>9 OR CA»4999THEN620 

*614 MSG$-" DO YOU WANT TO TAKE А 
LOAN? ":GOSUB510:GOSUB500 

*616 GETK$:IFK$-""THEN616 

+618 IFK$="Y"THENGOSUB519:GOSUB30 
0 

+620 GOSUB519:MSG$=" HOW MANY WOR 
KERS DO YOU NEED TODAY? ":GOSUBS 
00 

+622 MSG$-"[DOWN] ENTER NUMBER. ( 
1-9) [HOME]":GOSUB560 

+624 GETK$:IFK$-""THEN624 

+626 IFASC(K$)<490RASC(K$)>57THEN 
624 

628 WO=VAL(K$):QT=WO*8: PRINT" [HO 
ME][6"[ DOWN ]"][WHITE]";TAB(34) ;W 
0:GOSUB519 

+630 MSG$=" DO YOU NEED MATERIALS 
7 ":GOSUB590 
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+632 GETK$:IFK$=""THEN632 

*634 IFK$="Y"THENGOSUB519:GOSUB20 
9 

"636 GOSUB519:MSG$=" WORK IN PROG 
RESS. ":GOSUB500:RETURN 

“700 GOSUB250: PRINT" [HOME ][22"[DO 
WN]"][WHITE][RVSON] YOU RAN OUT 
OF MATERIALS!!" 

+792 PRINT"[RVSON] CREW WAS PAID 
AND SENT HOME AFTER";HC;"[LEFT] 
HRS[HOME]":CA=CA-(70*WO) :HC=0 
“704 60508350: НЕ=0:6050В190:6050В 
600: RETURN 

“800 GOSUB690: BU=0:HR=0 


“802 BU-BU*10:MA(1,3)-MA(1,3)-10: - 


MA(2,3)=MA(2,3)-8:HR=HR+.1:M=1 

+804 IFMA(1,3)<0 OR MA(2,3)<OTHEN 
60808700 

“806 IFBU<100THENGOSUB259;GOTO802 

+808 BU=(:READX:READZ: IFX=-1THENB 
U=0:HR=QT:GOTO812 

“810 POKESC+X ,Z+200:POKECL+X,9:GO 
SUB250:G0TO802 

-812 MSG$-" BRICK FINISHED!":GOSU 
B510:GOSUB500:G0SUB190:M-3:GOTOB 
16 

*814 LU=LU+3:MA(3,3)=MA(3,3)-3:1F 
MA(3,3) «0THENGOSUB700 

+816 60508250: IFLU=6THENLU=0: HR=H 
R+1.5 

+818 READX:READZ:IFX=-1THENLU=0:H 
R=QT:GOT0822 

+820 POKESC+X,Z:POKECL+X,7:GOTO81 
4 

+822 MSG$=" FRAME FINISHED!":GOSU 
B510:G0SUB500:GOSUB190:M-4:GOTOB8 
26 

+824 SH=SH+2:MA(4,3)=MA(4,3)-2:1F 
MA(4, 3)<OTHENGOSUB/90 

+826 С050В250:ТЕЅН<10ТНЕМ824 

+828 SH=0:HR=HR+1:READX:READZ:1FX 
=-1THENSH=0 : HR=QT : GOT0832 

+830 POKESC+X,Z:POKECL+X,11:GOTO8 
24 

+832 MSG$=" ROOF FINISHED!":GOSUB 
510:GO0SUB500:G0SUB190:M«5:G0T083 
6 

-834 М-5:РІ-РІз3:МА(5,3)-МА(5,3)- 
3:1FMA(5,3) «O0THENGOSUB700 

+836 GOSUB250 

+838 М-6:МА(6,3)-МА(6,3)-7:ІЕМА(6 
,3)«0THENGOSUB700 

+840 GOSUB250:HR=HR+1:1FPI<499THE 
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PROGRAMS 


350 


TYPED: HR 


We'll bet you're looking for- 


ward to trying out the 
fantastic programs in 
this issue of Ahoy! But 
we'll bet you're not 
looking forward to 
typing them in. If 
yov're an average 
typist, that should take 
you around 23 hours—not 
counting debugging time. 
How would you like 
someone to type the pro- 
grams for you? For, say— 
356 an hour? Don't you 
think it would be worth 35¢ 


an hour to free yourself up for 

more pleasant pursuits—like 

enjoying the rest of your Ahoy! 
magazine? 

If you order the Ahoy! Pro- 

gram Disk, you'll be getting 

that service for just under 

35< an hour. Because 

for $7.95 we'll mail 

you all the programs 

in a given issue, 

on a disk that's 

tested and ready to run 

with your C-64 or VIC 20. 

If you subscribe, you'll save 

even more: 12 monthly disks 

for $79.95, 24 for $149.95. 

You already know how to 

type. Why not use the hours 

you spend with your Commo- 

dore fo learn something new? 


Postage and handling included. 
nth Ahoy! Program Disk subscription: $149.95 in USA, 
5 in Canada. 
ind handling included. 


http://www.oldgamesitalia.net/ БА ara es eara 


Send coupon or facsimile to. 
Ahoy! Program Disk, lon International Inc., 
45 West 34th Street—Suite 407, New York, NY 10001. 
Moke checks payable to Double L Software 
NAME 


ADDRESS. 


CITY. STATE. ZIP. 
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IMPORTANT 
Before typing in an Ahoy! program, refer to the 
first two pages of the program listings section. 


N834 

«842 PI=0:HR=QT:MSG$=" PLUMBING & 
WIRING FINISHED!":GOSUB510:GOSU 
B500 

“844 GOSUB190:M=3:GOT0848 

“846 LU=LU+3:MA(3,3)=MA(3,3)-3:IF 

MA(3,3)<OTHENGOSUB700 

“848 GOSUB250:IFLU=6THENLU=0:HR=H 
Rel 

«850 READX:IFX--1THEN858 

*852 POKESC+X,160:POKECL+X,7:GOTO 
846 

*854 LU-LU43:MA(3,3)2MA(3,3)-3:IF 
MA(3,3)«0THENGOSUB700 

*856 GOSUB250:IFLU=6THENLU=0:HR=H 
Rel 

*858 READX:READZ:IFX--ITHENLU-0:H 
R=QT:GOTO862 

2590 РОКЕ5С-Х,2:РОКЕСІ,%Х,7:607085 


“862 MSG$=" SIDES FINISHED!":GOSU 
B519:GOSUB500: GOSUB190:M=7:GOTO8 
66 
“864 PL=PL+3:MA(7,3)=MA(7,3)-3:IF 
MA(7,3)<OTHENGOSUB700 

“866 GOSUB250:HR=HR+.5:IFPL<799TH 
EN864 

“868 MSG$=" PLASTERING FINISHED!" 
:GOSUB510:GOSUB500; PL=0:HR=QT 
“870 GOSUB190:M=8:GOTO874 
“872 HR=HR+1.5:MA(8,3)=MA(8,3)-1: 
IFMA(8,3)«0THENGOSUB700 
*874 GOSUB250 
*876 FORT-1TO3:READX:READZ:IFX--1 
THENT=0;HR=QT:GOTO880 
“878 POKESC+X,Z:POKECL+X,1:NEXTT: 
6070872 

+880 MSG$=" WINDOWS FINISHED!":GO 
SUB519:GOSUB500:GOSUB199:M=3:GOT 
0884 

“882 HR=HR+.5:MA(3,3)=MA(3,3)-4:1 
FMA(3,3) «0THENGOSUB700 

*884 GOSUB250:READX:IFX--1THEN888 

*886 POKESC+X,35:POKECL+X,1:GOTO8 
82 
“888 MSG$=" FENCE FINISHED!":GOSU 
B510:GOSUB500:GOSUB190:M-9:GOSUB 
636 

*890 HR-HR*2:MA(9,3)-MA(9,3)-1:IF 
MA(9,3)<OTHENGOSUB700 

“892 GOSUB250:READX:READZ:IFX--1T 
HEN896 

*894 POKESC+X,Z:POKECL+X,8:GOTO89 
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0 
-896 М-10:6051/В636 
*898 IFMA(10,3)<=QTHENGOSUB700 
+900 HR=HR+.25:GOSUB250:READX:REA 
р7:ІЕХ--1ТНЕМ904 
+902 POKESC*X,Z:POKECL4X,8:GOTO96 
0 

“904 МА(10,3)-МА(10,3)-1:6050В250 
:MSG$-" DOORS FINISHED!":GOSUB51 
9 
"906 GOSUB500:GOSUB190:Mz2:HR-QT: 
6070910 


-+908 НЕ=НЕ+1.5: МА(2,3)=МА(2,3)-10 


:ТЕМА(2,3) <ОТНЕМСОЅИВ700 
+910 60508250: КЕАРХ :ІЕХ=-1ТНЕМНК= 
QT:G0TO914 
*912 X=X+810:POKESC+X, 160: POKECL+ 
X,12:G0T0908 
+914 MSG$-" SIDEWALK FINISHED!":G 
OSUB510:GOSUB500:GOSUB190:GOSUB2 
50:М-11:С0-13 
+916 PA=PA+1:IFMA(11,3)<OTHENGOSU 
B700 
+918 READX:IFX=-1THENCO=C0+1:IFCO 
=15THEN924 
+920 POKECL+X,CO:IFPA<5THEN916 
+922 HR=HR+4:MA(11,3)=MA(11,3)-1: 
GOSUB250:PA=0:GOT0916 
+924 HO=HO+1;CA=CA+50000;GOSUB350 
: [FHO>HNTHEN934 
+926 MSG$-"[UP] HOUSE FINISHED! !" 
:GOSUB519:GOSUB500 
+928 MSG$=" HIT ANY KEY TO START 
NEXT HOUSE.":GOSUB500 
+930 GETK$:IFK$-""THEN930 
+932 RESTORE: GOT036 
+934 PRINT" [CLEAR]":POKE53281,1:P 
RINT"[6"[DOWN]" ]" ; TAB(6) ; " [BLACK 
]YOU FINISHED THE CONTRACT!!" 
+936 CA-CA-LA:CA$-STRS(CA):IFVAL( 
СА) «OTHEN944 
+938 PRINTTAB(4) ;" [DOWN] [DOWN]AFT 
ER PAYING YOUR DEBTS YOU MADE:" 
*940 PRINTTAB(19-INT(LEN(CA$)/2)) 
;" [DOWN] [ DOWN ]$" ; CAS 
*942 PRINTTAB(11);"[DOWN][DOWN]CO 
NGRATULATIONS[3"!" ]":С070950 
+944 PRINTTAB(7) ; " [DOWN] [ DOWN]TOO 
BAD YOU OWE THE BANK:" 
+946 PRINTTAB(19-INT(LEN(CA$)/2)) 
3" [DOWN] [DOWN ]$" ;CA$ 
+948 PRINTTAB(5);" [DOWN] [DOWN]AND 
HAD TO RETIRE IN DISGRACE." 
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+950 PRINT"[6"[DOWN]"]";TAB(8);"[ 
BLACK ]PRESS [F1] TO PLAY AGAIN" 

“952 GETK$:IFK$=""THEN952 

*954 IFK$="[F1]"THENRUN2 

+956 END 

“1000 REM ***** DATA STARTS ***** 
“1002 DATA.15,60,.10,25,1.5,200,1 
.5,200,2,300,.2,30,.09,15,60,450 
0 

“1004 DATA75,5000,300,20000,10,10 
00 , "BRICK", "BRICKS", "EACH", "CEMN 
T 

*1006 DATA"CEMENT","PER LB.","WOO 
D ","BOARDS", "ЕА, ", "SHING" 

*1008 DATA"SHINGLES", "EA.", "PIPES 
" "PIPE", "EACH", "WIRE ", "WIRE" 
+1610 DATA"PER ЕТЕЛ ,PLSTR", "PLAS 
TER","PER LB.", "WINDW", "WINDOWS" 
*1012 DATA"EACH",, "DOORS", "DOORS", 
"EACH", "G, DR." , "СА. DOORS", "EA." 
“1014 DATA"PAINT","PAINT","GALLON 
",801,42,802,41,803,42,804,41,80 

5 


*1016 DATA42,806,41,807,42,808,41 
,809,42,810,41,814,41,815,42,823 
+1018 DATA42,824,41,825,42,826,41 
,761,41,762,42,763,41,764,42,765 
+1020 DATA41, 766,42, 767,41, 768,42 
,769,41,770,42,774,42,775,41,783 
+1022 ПАТ441,784,42,785,41,786,42 
,721,42,722,41,723,42,724,41,725 
+1024 0АТА42,726,41,727,42,728,41 
,729,42,730,41,734,41,735,42, 743 
:1026 DATA42,744,41,745,42, 746,41 
,681,41,682,42,683,41,684,42,641 
+1928 DATA42,642,41,643,42, 644,41 
,601,41,602,42,603,41,604,42,561 
+1030 DATA42,562,41,563,42,564,41 
,521,41,522,42,523,41,524,42,481 
:1032 DATA42,482,41,483,42,484,41 
,81,81,442,42,443,41,444,42,001 
+1034 ПАТАЗ3,402,41,403,42,404,23 
,362,42,363,41,322,41,323,42,282 
+1036 DATA42,283,41,242,41,243,42 
,202,42,203,41,162,41,163,42,122 
+1038 DATA42,123,41,82,41,83,42,4 
2,42,43,41,2,41,3,42,-1,-1,771 
+1640 DATA1O1, 773,193, 731,101,691 
,101,651,101,611,101,733,103,693 
+1042 DATA103,653,103,613,103,571 
,79,572,119,573,80,776,101,736,1 
01 
+1044 DATA696,101,656,101,616,101 
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,782,103,742,103,702,103,662,103 
+1046 DATA622,103,576,79,577,119, 
578,119,579,119,580,119,581,119 

+1048 DATA582,80,681,76,641,101,6 
01,101,561,101,521,101,481,101,6 
82 

+1050 DATA111,683,111,684,111,685 
,111,686,111,687,111,688,111,689 
+1052 DATA111,690,111,531,101,491 
,101,694,111,695,76,655,76,615,7 
6 

+1054 DATA575,76,535,101,495,101, 
481,79,482,119,483,119,484,119,4 
85 


*1056 DATA119,486,119,487,119,488 
5,119,489,119,490,119,491,79,492 
*1058 DATA119,493,119,494,119,682 
576,642,101,602,101,562,101,522 
*1060 DATA101,482,79,690,76,650,7 
9,610,79,570,79,530,101,490,79,6 

02 
*1062 DATA76,603,111,604,111,605, 
111,606,111,607,111,608,111,609 
*1064 DATA122,569,103,529,80,522, 
79,523,119,524,119,525,119,526,1 
19 


*1065 DATA527,119,528,119,683,76, 
643,101,684,76,644,101,685,76,64 
S 


*1066 DATA101,686,76,646,101,687, 

76,647,101,688,76,648,101,689,76 
*1068 DATA649,101,641,79,601,79,5 
61,79,521,79,481,79,482,79,483,7 
9 


+1070 DATA484,79,485,79,486,79,48 
7,79,488,79,489,79,532,101,492,7 
9 


*1072 DATA533,101,493,79,534,76,4 
94,79,654,111,614,111,574,111,70 
3 


“1074 DATA122,704,122,705,122,706 
,122,663,103,623,103,583,103,664 
+1075 DATA193,624,193,584,193,665 
,103,625,103,585,103,666,103,626 
“1076 DATA103,586,103,546,80,545, 
80,544,80,543,80,542,80,541,80,5 
40 
“1078 DATA80,539,80,538,80,537,80 
,536,80,535,79,441,101,401,101,3 
61 
+1080 DATA101,321,101,281,101,241 
з101,454,101,414,101,374,101,334 
“1082 DATA101,294,101,254,101,240 
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;119,241,79,242,119,243,119,244 58,79,459,80,418,79,419,80,378,7 
*1083 DATA119,245,119,246,119,247 9 
;119,248,119,249,119,250,119,251 -1122 DATA379,80,338,79,339,80,29 
*1084 DATA119,252,119,253,119,455 8,79,299,80,255,79,256,79,257,11 
;101,415,101,375,101,335,101,295 9 
*1086 DATA101,255,101,215,101,502 .1123 DATA258,79,259,80,260,119,2 
:103,462,103,422,103,382,103,342 61,80,262,80,178,76,179,122,138, 
*1088 DATA103,302,103,262,103,222 79 
;103,215,79,216,119,217,119,218 -1124 DATA139,80,177,79,180,80,13 
*1090 DATA119,219,119,220,119,221 17,79,140,80,98,79,99,80,176,79,1 
,119,222,80,498,101,458,101,418 81 
*1091 DATA101,378,101,338,101,298 +1126 DATA80,59,77,100,77,141,77, 
:101,258,101,218,79,499,103,459 182,77,223,77,58,78,97,78,136,78 
"1092 DATA103,419,103,379,103,339 +1128 DATA175,78,214,78,45,77,86, 
,103,299,103,259,103,219,80,496 77,127,77,168,77,209,77,44,78,83 
*1094 DATA101,501,103,456,101,461 •1130 DATA78,122,78,161,78, 200,78 
ее е лоду ЕШ ‚5,100,6,100,7,100,8,100,9,100,1 
0 
+1096 DATA376,101,377,103,380,101 +1132 DATA100,11,100,12,100,13,10 
,381,103,336,101,337,103,340,101 0,14,100,15,100,16,100,17,100,18 
:1098 DATA341,103,296,79,297,80,3 +1134 DATA100,51,77,92,77,133,77, 
00,79,301,80,256,101,261,103,216  174,77,50,78,89, 78,128, 78,167, 78 
+1099 DATA79,221,80,454,79,414,79 -1136 DATA206,78,55,77,96,77,54,7 
,374,79,334,79,294,79,254,79,442  8,93,78,132,78,171, 78,210, 78,48, 
“1100 DATA101,402,101,362,101,322 77 
,101,282,101,242,79,441,79,401,7 +1138 DATA89,86,130,77,171,86,212 
9 ,77,47,78,86,86,125,78,164,78,20 
3 


“1102 DATA361,79,321,79,281,79,28 
2,79,283,119,284,119,285,119,286 +1140 DATA78,200,233,201,160,202, 
*1104 DATA119,287,119,288,119,289 160,203,160,204,160,205,160,206 
,119,290,119,291,119,292,119,293 +1142 DATA160,207,160,208,160,209 
*1106 DATA80,333,103,373,103,413, ,160,210,160,211,160,212,160,213 
122,412,111,411,111,410,111,409 +1144 DATA160,214,105,161,233,162 
*1107 DATA111,408,111,407,111,406 ,160,163,160,164,160,165,160,166 
,111,405,111,404,111,403,111,402 +1146 DATA160,167,160,168,160,169 
*1108 DATA76,445,101,405,76,365,1 ,160,170,160,171,160,172,160,173 
01,325,101,285,79,245,79,446,101 -1148 DATA160,174,160,175,105,122 
1110 DATA406,76,366,101,326,101, ,233,123,160,124,160,125,160,126 
286,79,246,79,447,101,407,76,367 >1150 DATA160,127,160,128,160,129 
1112 DATA101,327,101,287,79,247, ,160,130,160,131,160,132,160,133 
79,448,101,408,76,368,101,328,10 +1151 DATA160,134,160,135,160,136 
1 ,105,83,233,84,160,85,160,86,160 
+1114 DATA288,79,248,79,449,101,4 -1152 DATA87,160,88,160,89,160,90 
09,76,369,101,329,101,289,79,249 ,160,91,160,92,160,93,160,94,160 
+1115 DATA79,450,101,410,76,370,1 -1154 DATA95,160,96,160,97,105,44 
01,330,101,290,79,250,79,451,101 ,233,5,32,45,160,6,32,46,160,7,3 
+1116 DATA411,76,371,101,331,101, 2 
291,79,251,79,325,76,326,76,327, -1156 DATA47,160,8,32,48,160,9,32 
76 ,49,160,10,32,50,160,11,32,51,16 
+1118 DATA328,76,329,76,330,76,49 0 
5,79,496,79,497,119,498,79,499,8 -1158 DATA12,32,52,160,13,32,53,1 
0 60,14,32,54,160,15,32,55,160,16, 
+1120 DATA500,119,501,80,502,80,4 32 
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“1160 DATA56,160,17,32,57,160,18, +1206 DATA-1,535,247,536,247,537, 
32,58,105,323,32,363,32,443,32,4 247,538,247,539,247,540,247,541 
44 +1208 DATA247,542,247,543,247,544 
“1162 DATA32,563,32,564,32,-1,-1, 2 247,545, 247,546, 247,703,231, 663 
200,233,201, 250,202,250, 203,250 +1210 DATA231,623,231,583,231,543 
“1164 DATA204,250,205,250,206,250 + 208,494,231,454,231,414, 231,374 
,207,250,208,250,209,250,210,250 +1212 DATA231,334,231,294,231,254 
*1166 DATA211,250,212,250,213,250 ,231,602,32,603,32,604,32,605,32 
,214,105,161,233,162,204,163,204 +1214 DATA606,32,607,32,608,32,60 
“1168 DATA164,204,165,204,166,204 9,32,642,247,643,247,644,247,645 
,167,204,168,204,169,204,170,204 +1215 DATA247,646,247,647,247,648 
“1170 DATA171,204,172,204,173,204 ,247,649,247,562,32,569,32,522,3 
,174,204,175,105,122,233,123,250 2 
“1172 DATA124,250,125,250,126,250 +1216 DATA523,32,524,32,525,32,52 
,127,250,128,250,129,250,130,250 6,32,527,32,528,32,529,32,138,32 
“1174 DATA131,250,132,250,133,250 +1218 DATA139,32,178,32,179,32,13 
, 134,250,135, 250,136,105,83,233, 7,231,177, 231,240,32,-1,-1,602,2 
84 07 
“1176 DATA204,85,204,86,204,87,20 +1220 DATA693,208,562, 207,563,208 
4,88,204,89,204,90,204,91, 204,92 7 522,207,523, 208,608,207,609,208 
“1178 DATA204,93,204,94,204,95,20 +1222 DATA568,207,569,208,528,207 
4,96,204,97,105,44,233,45,250,46 ,529,208,604,160,605,160,606,160 
+1180 DATA250,47,250,48,250,49,25 +1224 DATA607,160,564, 207,569,208 
0,50,250,51,250,52,250,53,250,54 ,528,207,529,208,604,160,605,160 
“1182 DATA250,55,250,56,250,57,25 +1226 DATA606,160,607,160,564,160 
0,58,105,223,77,182,77,141,77,10 ,565,160,566,160,567,160,524,247 
0 “1228 рАТА525,247,526,247,527,247 
“1184 DATA77,59,77,-1,-1,681,682, ,202,204,403,239,404,250,362,207 
683,684,685,686,687,688,689,690, +1230 DATA363,247,364,208,322,229 
641 » 323,160,324, 231,282,207, 283,247 
“1186 DATA650,601,561,521,610,570 +1232 DATA284,208,411,204,412,239 
,530,531,532,533,534,694,695,654 ,413,250,371,207,372,247,373,208 
“1188 DATA655,614,615,574,575,704 +1233 DATA331,229,332,160,333,231 
,705,706,664,665,666,624,625,626 ,291,207,292,247,293,208,416,204 
*1190 DATA584,585,586,544,545,546 +1234 DATA417,250,376,207,377,208 
,481,482,483,484,485,486,487,488 ,336,229,337,231,296,207, 297,208 
“1192 DATA489,490,491,492,493,441 +1236 DATA420,204,421,250,380,207 
,442,443,444,445,446,447,448,449 ,381,208,340,229,341,231,300,207 
*1194 DATA450,451,452,453,405,406 +1238 DATA301,208,178,250,179,250 
,807,408,409,410,365,366,367,368 ,138,208,139,208,-1,-1,495,496,4 
+1196 DATA369,370,325,326,327,328 97 
2 329,330,285, 286,287,288,289,290 +1242 DATA498,499,500,501,502,503 
“1198 DATA401,361,321,281,241,242 1594,505,506,801,892,803, 804,805 
.243,244,245,246,247,248,249,250 +1244 DATA806,807,808,809,810,814 
“1200 DATA251,252,253,495,496,497 ,815,823,824,825,826,-1,571,207 
,498,499,500,501,502,455,456,457 +1246 DATA611,229,651,229,691,229 
“1202 ПАТА458,459,460,461,462,255 ,731,229,771,229,572,247,612,111 
:256,257,258,259,260,261,262,215 +1248 DATA652,32,692,160,732,160, 
*1203 DATA216,217,218,219,220,221 772,160,573,208,613,231,653,231 
,222,415,375,335,295,422,382,342 +1250 DATA693, 215, 733,231,773,231 
+1204 DATA302,418,419,378,379,338 o—1,-1,576, 207,577, 247,578, 247,5 
+339, 298, 299,176,180,181,140,98, 79 
99 “1252 DATA247,580,247,581, 247,582 
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,208,616,207,617,247,618,247,619 BUG REPELL 
“1254 DATA247,620,247,621,247,622 FOR 
208,656, 207,657,247, 658, 247,659 


+1256 DATA247,660,247,661,247,662 LINE # 2:AA LINE # 258:EP 
»208,696,207,697,247,698,247,699 LINE # 4:KP LINE # 260:BE 

*1258 DATA247,700,247,701,247,702 ІЛМЕ # 6:CB LINE # 300:AF 
,208,736,207,737,247,738,247,739 ІЛМЕ # 8:KP LINE # 302:GM 

*1260 DATA247,740,247,741,247,742 ІЛМЕ # 10:0J LINE # 304:0E 
,208,776,207,777,247,778,247,779 LINE # 12:KP LINE # 306:PE 

*1262 DATA247,780,247,781,247,782 ІЛМЕ # 14:16 LINE # 350:EF 
,208,-1,-1,1,2,3,6,7,8,9,10,11,1 LINE # 16:KP LINE # 352:CO 

2 LINE # 18:1Н LINE # 400:GN 

*1264 DATA-1,641,642,643,644,645, LINE % 20:HM LINE # 402:GN 
646,647,648,649,650,690,610,570, ІЛМЕ # 22:DL LINE # 500:HN 

530 LINE # 24:NO LINE # 510:DD 

*1266 DATA601,561,521,681,682,683 ІЛМЕ # 26:DP LINE # 600:NL 
,684,685,686.687,688,689,531,532 LINE # 28:MN LINE # 602:NI 

*1268 DATA533,534,574,575,614,615 ІЛМЕ # 30:GL LINE # 604:LI 
,654,655,694,695,535,536,537,538 LINE # 32:FP LINE # 606:Е0 

+1270 DATA539,540,541,542,543,583 ІЛМЕ # 34:LB LINE # 608:KJ 
,623,663,703,704,705,706,664,665 ІЛМЕ # 36:GK LINE # 610:1F 

*1272 DATA665,666,624,625,626,584 ІЛМЕ # 38:LM LINE # 612:MD 
,585,586,544,545,546,481,482,483 ІЛМЕ # 40:LN LINE # 614:MM 

+1274 DATA484,485,486,487,488,489 ІЛМЕ # 100:NI LINE # 616:HE 
1499,491,492,493,494,441,442,443 ІЛМЕ # 102:EC LINE # 618:KJ 

1276 DATA444,445,401,361,321,281 LINE # 104:DK LINE # 620:GM 
,241,242,243,244,245,285,325,365 LINE % 150:АЈ LINE # 622:JF 

*1278 DATA405,450,451,452,453,454 ІЛМЕ # 152:CH LINE # 624:GP 
,210,370,330,290,250,251,252,253 LINE # 154:0B LINE # 626:PN 

+1280 DATA254,294,334,374,414,446 LINE # 156:CA LINE # 628:CH 
1447,448,449,406,407,408,409, 366 LINE # 158:KD LINE # 630:FC 

+1282 DATA367,368,369,326,327,328 ІЛМЕ # 160:GK LINE f 632:GK 
,329,286,287,288,289,246,247,248 ІЛМЕ # 164:NM LINE f 634:KI 

*1284 DATA249,455,456,457,458,459 LINE # 190:PC LINE f 636:LN 
,460,461,462,415,375,335,295,422 LINE # 200:LE LINE # 700:HB 

+1286 DATA382,342,302,255,215,176 ІЛМЕ % 202:GA LINE # 702:JP 
,137,177,98,99,140,180,181,222,2 LINE # 204:1C LINE # 704:JD 

62 LINE # 206:AG LINE # 800:JC 
+1288 DATA256,257,258,259,260,261 LINE f 208:FN LINE # 802:LB 
,216,217,218,219,220,221,418,419 ІЛМЕ % 210:NF LINE # 804:LJ 

+1290 DATA378,379,338,339,298,299 LINE # 212:AL LINE # 806: HK 
»-1,571,611,651,691,731, 771,572 LINE # 214:JF LINE # 808:NM 

+1292 DATA612,652,692,732,772,573 LINE # 216:АЕ LINE # 810:BD 
1613, 653,693, 733,773,576,577,578 ІЛМЕ # 218:GD LINE # 812:CH 

+1294 DATA579,580,581,582,616,617 LINE # 220:GF LINE # 814:LF 
+618, 619,620,621,622,656,657,658 ІЛМЕ # 222:FC LINE # 816:FI 

+1296 DATA659,660,661,662,696,697 LINE # 224:0P LINE f 818:DI 
,698,699,700,701,702,736,737,738 ІЛМЕ % 226:IK LINE # 820:MJ 

*1298 DATA739,740,741,742,776,777 LINE % 228:0L LINE f 822:GF 
778,779,780,781,782,-1 LINE # 250:CA LINE f 824:CO 

vee UT NI Mari LINE % 252:HL LINE # 826:NA 

LINE # 254:KA LINE # 828:GJ 

LINE # 256:LJ LINE £ 830:AG 


LINE # 832:FD LINE # 938:GI LINE # 1082:DL LINE # 1174:NK 
LINE # 834:IP LINE # 940:KA LINE # 1083:GB LINE # 1176:MD 
LINE # 836:CH LINE # 942:00 LINE # 1984:CO LINE # 1178:IM 
LINE # 838:DG LINE # 944:KI LINE # 1086:FD LINE # 1180:0J 
LINE # 840:AF LINE # 946:KA LINE # 1088:0L LINE # 1182:00 
LINE # 842:JL LINE # 948:KA LINE % 1090:РА LINE # 1184:BD 
LINE % 844:DE LINE % 950:GE LINE % 1991:CL LINE # 1186:HD 
LINE # 846:LF LINE # 952:JD LINE # 1092:КР LINE £ 1188:KA 
LINE # 848:BG LINE # 954:MI LINE % 1094:КВ LINE # 1190:00 
LINE # 850:PD LINE # 956:1C ІЛМЕ % 1096:М0 LINE # 1192:NG 
LINE # 852:DG LINE # 1000:НА LINE # 1098:1р LINE # 1194:HM 
LINE # 854:LF LINE # 1002:HH LINE # 1099:MJ LINE # 1196:LK 
LINE # 856:BG LINE # 1004:JO LINE # 1100:Кр LINE # 1198:JK 
LINE # 858:DE LINE # 1006:0М LINE # 1102:JC LINE # 1200:JA 
LINE # 860:MN LINE # 1008:PD LINE # 1104:BB LINE # 1202:0В 
LINE # 862:GF LINE # 1010:0М LINE # 1106:МР LINE # 1203:PL 
LINE # 864:0F LINE # 1012:ЕР LINE # 1107:АК LINE # 1204: КМ 
ІЛМЕ # 866:NN LINE # 1014:FN LINE # 1108:ЈМ LINE # 1206:10 
LINE # 868:0E LINE # 1916:NL LINE # 1110:00 LINE # 1208:LO 
LINE # 870:PI LINE # 1018:NP LINE # 1112:0A LINE # 1210:HG 
LINE % 872:JO LINE # 1020:PD LINE % 1114:CF LINE # 1212:NG 
INE # 874:CH LINE # 1022:В0 LINE # 1115:HD LINE # 1214:AJ 
LINE # 876:IP LINE # 1924:AD LINE # 1116:MK LINE # 1215:DB 
LINE # 878:LJ LINE # 1026:CD LINE # 1118:FE LINE # 1216:EH 
LINE # 880:GN LINE # 1028:11, LINE # 1120:PE LINE # 1218:CC 
LINE # 882:GK LINE # 1030:ЕН LINE # 1122:II LINE # 1220:FH 
LINE # 884:FB LINE # 1032:PC LINE % 1123:HL LINE # 1222:MG 
LINE % 886:PD LINE % 1034:DH LINE % 1124:CH LINE # 1224:PJ 
LINE % 888:HB LINE % 1036:GP LINE # 1126:NL LINE # 1226:NP 
LINE % 890:JA LINE # 1038:BD LINE # 1128:IP LINE % 1228:АМ 
LINE # 892:EE LINE # 1040:JH LINE # 1130:NP LINE # 1230:NL 
LINE # 894:MG LINE # 1042:1А LINE # 1132:J0 LINE # 1232:GE 
LINE # 896:NM LINE # 1044:BK LINE # 1134:DA LINE # 1233:LM 
LINE # 898:HG LINE # 1046:HG LINE # 1136:HJ LINE # 1234:BL 
LINE % 900:KI LINE # 1048:CD LINE # 1138:0C LINE £ 1236:NC 
LINE % 902:JK LINE # 1050:EN LINE # 1140:CH LINE # 1238:B0 
LINE % 904:HB LINE % 1052:PC LINE % 1142:GP LINE # 1242:HO 
LINE # 906:IF LINE # 1054:MM LINE # 1144:FP LINE # 1244:MK 
LINE # 908:РМ LINE # 1956:JK LINE # 1146:16 LINE # 1246:DA 
LINE # 910:АМ LINE # 1058:BN LINE # 1148:HB LINE # 1248:GN 
LINE # 912:AP LINE # 1060:10 LINE # 1150:KC LINE # 1250:DI 
LINE # 914:JC LINE # 1962:KP LINE # 1151:IH LINE # 1252:LI 
LINE # 916:AF LINE # 1064:LB LINE # 1152:HJ LINE # 1254:JF 
LINE # 918:60 LINE # 1065:ND LINE # 1154:01 LINE # 1256:LJ 
LINE # 920:LB LINE # 1066:FJ LINE # 1156:GP LINE % 1258:NK 
LINE £ 922:NG LINE £ 1068:00 LINE % 1158:LN LINE # 1260:00 
LINE # 924:10 LINE # 1070:0F LINE # 1160:JO LINE # 1262:FM 
LINE # 926:AE LINE # 1072:ML LINE % 1162:IJ LINE # 1264:BE 
LINE # 928:D0 LINE # 1074:DG LINE # 1164:0H LINE # 1266:JJ 
LINE # 930:IP LINE # 1075:GH LINE # 1166:MO LINE % 1268:АР 
LINE # 932:LI LINE # 1076:АК LINE # 1168:KL LINE # 1270:HM 
LINE # 934:DL LINE # 1078:KI LINE # 1170:NJ LINE # 1272:K0 
LINE % 936:MO LINE % 1080:DC LINE # 1172:KC LINE # 1274:NA 
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LINE # 1276: AN LINE # 1290:NM ЕК(Х+1) 
LINE # 1278:0K LINE % 1292:EL -10220 DEF FNMS(X)=INT(X/256) 
LINE # 1280:DE LINE # 1294:NI -10230 DEF FNLS(X)=X-256*FNMS(X) 
LINE # 1282:HO LINE # 1296:KG -10240 DIM LN(200,11) 
LINE # 1284:РІ LINE % 1298:DJ +10245 
LINE # 1286:GN LINES: 324 :10250 MX=9999 :REM MAXIMUM LINE# 
LINE # 1288:KB +10255 
+10260 :REM 'GOTO,GOSUB,THEN' COD 
ES 
CROSS :10270 GT=137:GS=141:TH=167 
-10280 :REM CL=CURRENT LINE ADDR 
REF +10290 :REM NN=PRGM LINE COUNT 
"OR PAGE 98 10300 CL=FNPT(43) :REM FIRST LIN 
41 REM:::RUPERT REPORT #12::: *10310 NN=1 
“2 GOTO 10000 “10320 DNFLG=0 
43: :10325 PRINT CHR$(147) :REM CLEAR 
*4 :REM....SET MAX LINE# IN 10250 -10330 INPUT"SEND OUTPUT TO SCREE 
45: N OR PRINTER (S/P)";RR$ 
6 :REM..LINES 7-12 ARE DEMOS ONL -10340 IF RR$="S" THEN DEV=3:GOTO 
19370 
“7 IF N THEN 4 : GOSUB 5 +10350 IF RR$="P" THEN DEV=4:GOTO 
+8 IF N THEN GOTO 5 10370 
29 IF N THEN GOSUB 6 +10360 GOTO 10330 
*10 ON N GOTO 7,8,9,10 +10365 :REM SPECIFY FILE# FOR FF 


*11 ON N GOSUB 9,10,4 
*12 GOTO 5:GOSUB 10 


“10370 
+10380 


FF=222: OPEN FF,DEV 
PRINT CHR$(147)"SCANNING L 


“10000 == INE #:" 

10001 :REM СЕ055-КЕРЕВЕМСЕ “10390 RETURN 

“10002 :REM GOSUBS AND GOTOS  -10399 :REM---------------------- 
*10003 :ВЕМ=========ш===ч=ч==ш====ш=ш - 

*10004 : *10400 :REM...SCAN NEXT LINE..... 
“10010 GOSUB 10200 :REM INITIALIZ -*10401 :REM---------------------- 
E 3 { 

10020 GOSUB 10400 :REM SCAN А LI +10405 :REM NL=NEXT LINE ADDR 

NE “10410 NL=FNPT(CL) 

10030 GOSUB 10600 :REM UPDATE PT -10420 Al=CL+4 :REM START OF TEXT 
RS *10430 A2-NL-2 :REM END OF TEXT 
*10040 IF DNFLG=0 THEN 10020 *10440 LN(NN,O)-FNPT(CL42):REM LI 

10050 GOSUB 20000 :REM PRINT RES МЕЁ 

ULTS 10445 :REM PUT CRSR @ ROW 0,COL 

10060 GOSUB 20700 :REM BACK REFE 20 

RENCE 10450 POKE214,255:PRINT:POKE211, 

*10070 CLOSE FF 20 

*10099 END *10460 PRINT LN(NN,0); 

*10199 :REM---------------------- *10470 LN(NN,1)-0 :REM COUNT 

- *10475 :REM STEP THRU ENTIRE LINE 

*10200 :REM......INITIALIZE...... >10480 FOR MM-Al TO А2-2 

А +10490 РМ=РЕЕК(ММ) 

+10201 -10495 :REM SKIP LINE AFTER "КЕМ 
' 

-10205 PRINT CHR$(147) :REM CLEAR +10500 IF PM-143 THEN MM-A2-2 :60 

+10210 DEF FNPT(X)=PEEK(X)+256*PE ТО 10530 


AHOY. 
p://www.oldgarr 


w.oldgan 


“10510 IF РМ-ТН THEN GOSUB 20200 +20410 MM=MM+1 : PM=PEEK(MM) 
“10520 IF PM-GT OR PM=GS THEN GOS .20420 IF PM-32 THEN 20410 


UB 20400 20430 GOSUB 20600 :REM LL <==LIN 
+10530 NEXT MM Е# 
+10540 RETURN +204540 СТ=СТ+1 
+10599 :REM---------------------- +20450 LN(NN,1)=CT 
- +20460 LN(NN,CT+1)=LL 
10600 :REM...UPDATE POINTERS... -20465 :REM ON GOSUB/GOTO N1,N2, 
10601 :REM---------------------- . 
- *20470 IF PM-ASC(",") THEN 20410 
*10610 CL=NL -20480 RETURN 
*10620 IF FNPT(CL)-0 THEN DNFLG-1 +20599 : 
:GOTO 10660 +20600 :REM.PUT LINE£ @ MM INTO L 
+10630 IF FNPT(CL+2)>MX THEN DNFL L 
6-1 :GOTO 10660 +20601 : 
10640 NN=NN+1 “20610 LL$="" 
10650 СТ-0 “20620 LL$=LL$+CHR$(PM) 
10660 RETURN “20630 MM=MM+1 : PM=PEEK(MM) 
*10999 :REM---------------------- роо IF PM>47 AND РМ<58 THEN 20 
- 20 
+20000 :REM...PRINT RESULTS... +20650 IF PM=32 THEN ММ=ММ+1:РМ=Р 
+20001 :REM---------------------- EEK(MM):GOTO 20650 


= “20660 LL=VAL(LL$) 

*20005 PRINT#FF:PRINT#FF,"(11"="] .20670 RETURN 

M *20699 :REM---------------------- 
*20010 FOR XX=1 TO NN - 

*20020 CT=LN(XX,1) *20700 :REM...PRINT BACK REFERENC 
“20030 IF CT=0 THEN 20090 ES 


20040 PRINT#FF,LN(XX,9)"==>", *20701 E 
*20050 FOR YY-1 TO CT - 

220060 PRINTZFF, LN(XX,YY41); *20705 PRINT#FF:PRINT#FF,"[11"="] 
*20070 NEXT YY " 

*20080 PRINT#FF *20710 FOR XX-1 TO NN 

*20090 NEXT XX *20720 SS-LN(XX,0) :REM SEARCH LI 
*20100 RETURN NE 

*20199 : *20740 FOR YY-1 TO NN 


*20200 :REM...FOUND 'THEN'..... *20750 CT-LN(YY,1):IF СТ=0 THEN 2 


*20201 : 0820 

+20210 ММ=ММ+1 : РМ-РЕЕК(ММ) +20760 FOR 22-2 TO CT41 

120220 IF PM=32 THEN 20210:REM SP 220770 ТЕ LN(YY,ZZ)OSS THEN 2081 

ACE 0 

120230 IF PN<48 OR PM>57 THEN 202 20780 IF ТТ-0 THEN PRINT#FF,SS " 
) <==" 

20240 GOSUB 20600 :REM LL <== LI +20790 TT=1 

NE *20800 PRINT#FF, LN(YY,0); 

-20250 CT=CT+1 120810 NEXT zz NOT?) 

:20260 пова -20820 NEXT ҮҮ 

+20270 LN(NN,CT+1)=LL +20830 IF TT»0 THE : 

-20280 RETURN =0 Е ыдын 

*20399 : “20840 NEXT XX 

120400 :REM..HAVE 'GOSUB' OR "СОТ 220850 RETURN 

*20401 : 


"^ 
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10250:ND LINE 
10255:DI LINE 
19260:NO LINE 
10270:АЕ LINE 
19280: AG LINE 
10290:HJ LINE 


20001:0G “13 REM ARRAY TO HOLD COMPLEX CHA 
20005:LN RACTERS 

20010:FF “14 REM 

20020:DI “15 DIM CC$(7) 

20030:LL “17 REM 

20040:LP “18 REM GO EXECUTE SUBROUTINE 


С-64 BUG REPELLENT LINE CODES LINE % 20220:CF LINE # 20630:PI 
FOR CROSS REF LINE % 20230:HK LINE £ P 
LINE # 20240:NL LINE £ B 
LINE # 1:JJ LINE # 10380:АК LINE # 20250:LI LINE % 20660:С0 
LINE # 2:1Е LINE # 10390:1M LINE # 20260:DI ІЛМЕ # 20670:1M 
LINE # 3:DI LINE # 10399:0G LINE # 20270:LF LINE # 20699:0G 
LINE 4 4:FK LINE % 10400:PL LINE % 20280:1M LINE # 20700:LA 
LINE # 5:DI LINE % 10401:0G LINE # 20399:DI LINE # 20701:0G 
LINE # 6:11 LINE # 10405:FA LINE # 20400:11 LINE £ 20705:LN 
LINE % 7:MN LINE % 10410:GP LINE # 20401:DI LINE £ 20710:FF 
LINE % 8:EC LINE # 10420:JL LINE % 20410:PI LINE £ 20720:FF 
LINE # 9:EN LINE % 10430:BG LINE % 20420:NC LINE % 20740:GD 
LINE # 10:АА LINE # 10440:JE LINE # 20430:NL LINE % 20750:EF 
LINE # 11:JM LINE # 10445:LJ LINE # 20440:LI LINE # 20760:CH 
LINE # 12:DN LINE # 10450:LC LINE % 20450:DI ІЛМЕ # 20770:MJ 
LINE # 10000:MO ІЛМЕ # 10460:MN LINE % 20460:LF LINE # 20780:N0 
LINE # 10001:BP ІЛМЕ # 10470:CA LINE % 20465:EB LINE % 20790:10 
LINE # 10002:80 ІЛМЕ # 10475:GC LINE # 20470:PG ІЛМЕ # 20800:G0 
LINE # 10003:MO LINE % 10480:GG LINE % 20480:1M LINE # 20810:DN 
LINE # 10004:DI LINE # 10490:0L LINE # 20599:DI LINE # 20820:DP 
LINE 4 10010:FL LINE # 10495:PH LINE # 20600:JC LINE % 20830:JJ 
LINE % 10020:АВ LINE # 10500:HD LINE # 20601:DI ІЛМЕ # 20840:DF 
LINE % 10030:ED LINE # 10510:KA LINE # 20610:LC ІЛМЕ # 20850:1M 
LINE # 10040:JK LINE # 10520:GJ LINE # 20620:GJ LINES: 147 
LINE 4 10050:HC ІЛМЕ # 10530:CH 
LINE # 10060:DH ІЛМЕ % 10540:1М СНА АСТЕР SET 
LINE % 10070:CL LINE # 10599:06 
LINE % 10099:1C LINE # 10600:IK EXA PLE 
LINE # 10199:0G ІЛМЕ # 10601:06 
LINE 4 10200:FN ІЛМЕ # 10610:NL FROM PAGE 98 C-64 VERSION 
LINE # 10201:0G LINE # 10620:АР -6 REM SAMPLE CHARACTER SET HANDL 
LINE # 10205:1N LINE # 10630:CA ER 
LINE # 10210:0L LINE # 10640:NG -7 REM 
LINE % 10220:ND LINE # 10650:HI “8 REM HOW MANY CHARACTERS? 
LINE % 10230:60 LINE # 10660:1M “9 REM 
LINE % 10240:11 ІЛМЕ # 10999:06 “10 2-32 
LINE # 10245:DI LINE # 20000:FF -12 REM 
# # 
# # 
# # 
# # 
# # 
# # 
LINE # 10300:AN LINE # C +19 REM 
LINE # 10310:IC LINE # А +20 GOSUB 400 
LINE # 10320:FM LINE # P +27 REM 
LINE # 10325:IN LINE # D -28 REM CURSOR CONTROL CHARACTERS 
LINE 2 10330:1M LINE # F -29 REM 
LINE # 10340:MN LINE # М *30 D$=CHR$(17):L$=CHR$(157):U$=C 
LINE % 10350:MD LINE # I BRS 185) RSECHRSQAS) 

10360:IC LINE # I 
TINE H 10365:1J LINE # I -38 REM Fl-BIG SHIP F3=SMALL SHI 
LINE £ 10370:EA LINE # 20210:PI P  F5-STARSHIP 1 


“39 КЕМ 

-40 CC$(9)="KLM"+D$+L$+L$+L$+"NOP 
"4U$:CC$(1)=R$+"J"+D$+L$+L$+"HI" 
+U$:CC$(2)="STU" 

47 REM 

*48 REM F7-STARSHIP 2 
P3 Еб-СОАСН 

*49 REM 

*50 CC$(3)2" VWX" : CC$ (4) 2"12" 4D$4L 
$4L$4" YZ" 4U$:CC$(6) -R$4"6" 4D$4L$ 
+1$+"345"+0$ 

“57 КЕМ 

+58 REM F4=STARBASE 

“59 REM 

“60 CC$(5)=R$+R$+CC$(4)+D$+D$++L$ 
+L$+L$+L$+CC$(2)+CC$(3)+U$+U$ 

“67 REM 

“68 REM 4-WAY INTERSECTION 

“69 REM 

+709 Q$=D$+L$+L$+L$+L$:A$=R$4+"AA"+ 
R$+Q$:CC$(7)=R$+"FG"+R$+Q$+"FAAG 
"+0$+"АССА" 

“75 CC$(7)=CC$(7)+Q$+"EAAD"+QS$+AS 
+A$+A$+A$+A$+"FBBG"+U$+U$+U$+U$+ 
U$+U$+U$+U$+U$ 

“80 PRINT "[CLEAR]":RESTORE:FOR I 
=f) TO Z:READ A$:READ A,A,A,A,A,A 
,A,À 

*85 PRINT A$"=[RVSON]"A$"[RVSOFF] 
"S:NEXT 

REM 

“88 REM GET VALID KEYPRESS 

REM 

GET A$:IF A$="" THEN 90 

REM 

REM INVERSE ON OR OFF 

*99 REM 

“100 A=ASC(A$):IF А-18 OR 4-146 T 
HEN I$-A$:GOTO 90 

*107 REM 

*108 REM FUNCTION KEYS--PRINT COM 
PLEX CHARACTERS 

*109 REM 

+110 IF A>132 AND A<141 THEN А-А- 
133:PRINT I$CC$(A);:GOTO 90 

*117 REM 

*118 REM DON'T PRINT INVERSE SPAC 
E! 

*119 REM 

*120 IF A-32 THEN PRINT "[RVSOFF] 
"A$;:GOTO 90 

“127 КЕМ 

:128 REM PRINT ANY OTHER KEY 


F2=STARSHI 


oldgan 


“129 REM 

+130 PRINT I$4$;:GOTO 90 

“397 REM 

“398 REM SWITCH BANKS AND COPY NO 
N-INVERSE CHARACTER PATTERNS 
*399 REM 

“400 CM=14:CS=CM*1024 

+410 POKE 56333,127 

“420 POKE 1,PEEK(1) AND 251 

“830 FOR I=0 TO 1023:РОКЕ CS4I,PE 
EK(53248+1) :NEXT 

“440 POKE 1,PEEK(1) OR 4 

+450 POKE 56333,129 

“457 REM 

“458 REM FLIP TO NEW CHARACTER SE 
T AREA 

+459 REM 

“460 POKE 53272,(PEEK(53272)AND 2 
40) OR CM 

+467 REM 

“468 REM ADDING 1024 PUTS IT IN I 
NVERSE VIDEO AREA OF MEMORY 

*469 REM 

“870 CS=CS+1024:FOR I=) ТО Z:READ 


REM 

REM CONVERT CHARACTER TO SCR 

CODE 

REM 

C=ASC(C$):IF (C563 AND С<96) 
OR (C>159 AND С<192) THEN C=C-6 
4:GOTO 500 

*490 IF C595 AND C<128 THEN C=C-3 
2:GOTO 500 

“500 CP=CS+8*C 

“507 REM 

“508 REM READ PATTERN AND РОКЕ ІТ 
INTO MEMORY 

“509 REM " 

“510 FOR K=CP TO CP+7:READ А:РОКЕ 
K,A:NEXT:NEXT 

*520 RETURN 

*62997 REM 

*62998 REM CHARACTER DATA 

*62999 REM 

*63000 DATA "A",0,251,251,251,0,1 
91,191,191 

*63001 DATA "B",255,255,255,255,2 
552,2555255,255 

*63002 DATA "C",0,0,0,0,0,191,191 
,191 

*63003 DATA "D",239,238,236,232,1 

6,224,192,128 
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“63004 DATA "E",247,119,55,23,8,7 
83003 DATA."P™,1,2,6,14,16,47,11 
63006 DATA "б", 128,192,224, 240,8 
"63007 DATA "Н",0,0,0,0,120,56,31 
"$3008 DATA "I", 240,176, 240,160,2 
:63009 DATA Ру", 0,0,0,0,128,128,1 
263010 DATA "К",0,1,1,1,3,5,15,13 
“63011 DATA "L",8,8, 24,40, 120,40, 
«63512, DATA "6,128, 244,172,216 
3013 DATA "N",15,5,3,1,1,255,63 


, 
“63014 DATA "О",24,40,120,40,24,8 


255,255 

*63015 DATA "P",248,188,254,128,1 
28,255,252,252 

*63016 DATA "Q",16,24,28,22,31,16 
‚255,63 

53017 DATA "R",0,0,8,62,62,54,8, 


“63018 DATA 
0 
“63019 DATA 


ЭБ 02030: 0:72 3]192555 


"p"50,0,3,0,192,131,2 


55.0 

+63020 DATA "U",0,255,252,96,192, 
128,255,0 

-63021 DATA "V",0,255,63,6,3,1,25 
5,0 

*63022 DATA "W",0,0,192,0,3,193,2 
55,0 

+63023 DATA "Х",0,0,0,0,224,248,2 
55,0 

63024 DATA "Ү",2,34,98,99,113,12 
0,111,96 

-63025 DATA "Z",64,68,70,198,142, 
30,246,6 


*63026 DATA 

*63027 DATA 
4,64,64,64 
«63028 DATA 
728 

“63029 DATA 
9,129,255,0 
“63030 DATA "5",0,96,128,56,68,68 
‚68,56 

+63031 DATA "6",0,195,189,126,102 


WIM 5151,153,2,2,2,2 
"2",128,128,128,192,6 


"3",0,6,1,28,34,34,34 


"4", 255,126,60,189,18 
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,102,102,102 

“63040 DATA " ",255,255,195,195,1 
95,195,255,255 
+63900 OPEN2,8,2,"64,S,W":CMD2:LI 
ST-63906 


VIC 20 VERSION 
*10 72-32 
*15 DIM CC$(7) 
“20 GOSUB 400 
+30 D$=CHR$(17):L$=CHR$(157) :U$=C 
HR$(145) : К$=СНЕ$(29) 
+40 CC$(0)="KLM"+D$+L$+L$+L$+"NOP 
"+U$:CC$(1)=R$+"J"+D$+L$+L$+"HI" 
+U$:CC$(2)="STU" 
+50 CC$(3)="VWX":CC$(4)="12"4D$+L 
$4+L$4"YZ"+U$ : CC$(6) SR$4" 6" 4D$4L$ 
+1$+"345"+0$ 
“60 CC$(5)=R$+R$+CC$(4)4+D$+D$+4L$ 
+L$+L$+L$+CC$(2)+CC$(3)+U$S+U$ 
“70 CC$(7)2"J" 
+80 PRINT " [CLEAR i 
+90 GET А5:1Е A$-"" THEN 90 
*100 А-А5С(А5):ІЕ A=18 OR A=146 Т 
HEN I$=A$:GOTO 90 
+110 IF A>132 AND A<141 THEN А-А- 
133:PRINT I$CC$(A);:GOTO 90 
+120 IF A=32 THEN PRINT "[RVSOFF] 
"A$;:GOTO 90 
“130 PRINT I$A$;:GOTO 90 
+400 CS=6144:CM=14 
+460 POKE 36869, (PEEK(36869)AND 2 
40) OR CM 
“470 FOR I-0 TO Z:READ C$ 
+480 C=ASC(C$):IF (C563 AND C496) 
OR (С>159 AND С<192) THEN C-C-6 
4:GOTO 500 
+490 IF C>95 AND С<128 THEN С-С-3 
2:GOTO 500 
-500 CP=CS+8*C 
+510 FOR K=CP TO CP+7:READ А:РОКЕ 
K,A:NEXT:NEXT 
“520 RETURN 
*63000 DATA "A",0,251,251,251,0,1 
91,191,191 
+63001 DATA "В",255,255,255,255,2 
55,255,255,255 
-63002 DATA "C",0,0,0,0,0,191,191 


191 
+63003 DATA "D",239,238,236,232,1 
6,224,192,128 


-63004 DATA "E",247,119,55,23,8,7 


ЕЕ 


ОЕ “63040 DATA " ",0,0,0,0,0,0,0,0 
“63005 DATA "F",1,2,6,14,16,47,11 
1,239 BUG REPELLENT LINE CODES 
-63006 DATA "G",128,192,224,240,8 РОК C-64 CHARACTER SET EXAMPLE 
,236,238,239 LINE # 6:ME LINE % 118:FI 
*63007 DATA "H",0,0,0,0,120,56,31 LINE # 7:JD LINE # 119:JD 
no LINE # 8:KI LINE % 120:LD 
“63008 DATA "I",240,176,240,160,2 LINE 4 9:JD LINE # 127:JD 
07,142,252,248 LINE £ 10:HC LINE # 128:GJ 
+63009 DATA "Ј",0,0,0,0,128,128,1 ІЛМЕ # 12:JD LINE # 129:JD 
92,160 LINE # 13:CG LINE # 130:0C 
*63010 DATA "K",0,1,1,1,3,5,15,13 LINE # 14:JD LINE # 
2201 DATA "L",8,8,24,40,120,40, ІЛМЕ # 15:LD LINE H 
24,8 LINE # 17:JD LINE 
т р, SUNS OG 1285284725216 LINE # 18:GF LINE t 
184,248,18. LINE # 19:JD LINE 
-63013 DATA "N",15,5,3,1,1,255,63 LINE # 20:CE LINE i 
, LINE # 27:JD LINE 
чал шыла "0",24,40,120,40,24,8 ІЛМЕ # 28:FH LINE H 
› LINE # 29:JD LINE 
763015 DATA "P",248,188,254,128,1 ІЛМЕ # 30:FP LINE # 
,255,252,252 LINE % 37:JD LINE # 
*63016 DATA "Q",16,24,28,22,31,16 ІЛМЕ # 38:FI LINE # 
255205 vere LINE # 39:JD LINE # 
63017 DATA "R",0,0,8,62,62,54,8, ІЛМЕ # 40:MI LINE # 
27 : 
„127 ane LINE # 47:JD LINE # 
63018 DATA "8",0,0,0,0,7,31,255, LINE # 48:40 LINE # 
аг ie Gabe LINE # 49:JD LINE # 
por DATA "T",0,0,3,0,192,131,2 ІЛМЕ % 50:АВ LINE # 
7 : 
-63020 DATA "U",0,255,252,96,192, LINE Ё 3750 LINE + 
128,255,0 Viene OMEN ы 4 38:74 LINE # 
+63021 DATA "V",0,255,63,6,3,1,25 AQ LINE # 
oer ,0,255,63,6,3,1, LINE # 60:JM E M 
-63022 DATA "W",0,0,192,0,3,193,2 p LINE 
6302 »0,0,192,0,3,193, LINE % 68:FK LINE 4 
-63023 DATA "X',0,0,0,0,224,248,2 о ШИЕ 
Be LINE # 70:Ғ0 LINE # 
-63024 DATA "Y",2,34,98,99, 113,12 ure ДЕШІ LINE # 
LINE # 80:EL LINE # 
0,111,966, LINE # 85:06 LINE # 
“93025 DATA 2",64,68,70,198,142, LINE # 87:JD LINE # 
й А 
63026 DATA "1",1,1,1,3,2,2,2,2 WE CINE d 
# 89:JD LINE # 
-63027 DATA "2",128,128,128,102,6 LINE % 90:FK LINE # 
^, 2987 eS M LINE # 97:JD LINE # 
202028 DATA "3 50,6,1,28,34,34,34 ІЛМЕ # 98:MN LINE # : 
LINE # 99:10 LINE # 63004:FO 
"63029 DATA "4",255,126,60,189,18 LINE # 100:PF LINE # 63005:0H 
9, 3129, ‚255,0 LINE # 167:JD LINE # 63006:JD 
HUS 5",0,96,128,56,68,68 LINE % 108:00 LINE % 63007:MD 
LINE # 109:JD LINE % 63008:FF 
56301 дата "6",0,195,189,126,102 LINE # 110:CJ LINE # 63009:PN 
162,102,102 LINE # 117:JD LINE # 63010:01, 


(d 
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LINE # 63011:L0 LINE # 63023:MP :I=0:B=0:F=56095:CO=0:X2=60:Y2=2 
LINE % 6301 K LINE # 63024:В0 10:Х3-30: 
LINE # 6301 с LINE # 63025:МІ 
LINE # 6301 Р LINE # 63026:LF ==== 
LINE # 6301 с LINE # 63027:DF -8 REM **** TITLE SCREEN **** 
LINE % 6301 N LINE # 63028:NA +9 REM == mmm 
LINE % 6301 0 LINE # 63029:К0 +10 PRINT "[CLEAR] :POKE 53280,0: 
LINE % 6301 M LINE # 63030:JL РОКЕ 53281,0 
LINE # 6301 Н LINE # 63031:0P >20 FOR А-1 TO 100:X-INT(RND(1)*6 
LINE # 6302 K LINE # 63040:PJ 40)+1:C=INT(RND(1)*6)+2 
LINE % 6302 0 LINES: 120 *30 POKE 554564X,C:POKE 11844X,46 
LINE # 63022:IK :NEXT А 

*40 PRINT "[HOME][PURPLE][40"[c P 

REPELLENT L ЕН E CODES Т1" 


б 
POR VIC 20 CHARACTER SET EXAMPLE +50 PRINT "[UP][18" "][c 7][RVSON 
LINE # 10:HC LINE # 63006:LL ] " 


# # 
LINE # 15:LG LINE # 63007:FG +60 PRINT "|7" "](C) DOUBLE[RVSOF 
LINE # 20:CO LINE # 63008:СВ Е] [RVSON] [RVSOFF] SOFTWARE" 
LINE # 30:FP LINE # 63009:0B -70 PRINT "[19" "][RVSON] " 
LINE # 40:MI LINE # 63010:FD *80 PRINT "[PURPLE][4O"[c Y]"]" 
LINE # 50:AB LINE # 63011:СЕ “90 PRINTTAB(4)"[RVSON][YELLOW][3 
LINE # 60:JM LINE # 63012:DK " "][c *][3" "][c *][3" "J[c *][ 
LINE # 70:HK LINE # 63013:ЛА 03" "Jic *][3" "][c жү" 
LINE # 80:HL LINE £ 63014:FP *100 PRINTTAB(4)"[RVSON][YELLOW] 
LINE # 90:GF LINE £ 63015:PA [RED][3" "][YELLOW] [RED][3" "][ 
LINE # 100:KJ LINE 4 63016:GO YELLOW] [RED][3" "][YELLOW] [RED 
LINE # 110:FL LINE # 63017:XH ][3" "][YELLOW] [RED][3" "][RVSO 
LINE £ 120:PF LINE # 63018:MD FF][10" "][RED][s Q]" 
LINE # 130:0D LINE # 63019:СР “110 PRINTTAB(4)"[RVSON][YELLOW] 
LINE # 400:4G LINE £ 63020:CP [RED] [YELLOW] [c *] [RED] [YELL 
LINE 4 460:KK LINE # 63021:HB OW] [RED] [YELLOW] [RED] [YELLOW 
LINE # 470:MK LINE # 63022:KE 1 [RED] [YELLOW] [RED] [RVSOFF] 
LINE % 480:IN LINE % 63023:KH  [RVSON][YELLOW] [RED] [YELLOW][ 
LINE # 490:J0 LINE # 63024:EK c *]" 
LINE # 500:MC LINE % 63025:HA +120 PRINTTAB(4)"[YELLOW][c *][RE 
LINE # 510:EG LINE % 63026:JF D][RVSON][3" "][YELLOW] [RED][3" 
LINE % 520:1М LINE % 63027:PF “J{YELLOW] [RED][3" "][YELLOW] 
LINE # LINE # 63028:DL [RED] [RVSOFF] [RVSON][YELLOW] 
LINE # LINE # 63029:LL [RED] " 
LINE # LINE # 63030:NF “130 PRINTTAB(4)"[RVSON][YELLOW][ 
LINE # 63003:JM LINE # 63031:BH 3" "J[RED] [YELLOW] [RED] [RVSOF 
LINE 2 63004:J0 LINE # 63040:AN Е] [RVSON][YELLOW] [RED] [YELLO 
LINE % 63005:DE LINES: 55 W] [RED] [YELLOW] [RED] [YELLOW] 
[c *] [RED] [YELLOW] [c *][RVSO 
SPACE FF][6" "][GREEN][s Q]" 
+150 PRINTTAB(4)"[YELLOW][c *][RV 
ATROL SON][RED][3" "][YELLOW][RVSOFF][ 
PA PAGE 9: c *][RVSON][RED] [YELLOW][RVSOFF 


*2 $1254272:FOR A-SI TO 51+24:РОК ] [c *][RVSON][RED] [YELLOW][RV 

E A,0:NEXT А SOFF][c *][RVSON][RED] [RVSOFF][ 
+3 PRINT "[CLEAR]":POKE 53280,0:P YELLOW][c *][RVSON][RED][3" "J[R 
OKE 53281,0:HS- :Ү4-0 VSOFF][YELLOW][c *][RVSON][RED][ 
*4 V=53248:X=60: 1-240:Y1-30 3" "]":PRINT 
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+150 PRINT TAB(12)"[RVSON][YELLOW 
113" "Ife *][3" "J[c *][3" "l[c 
рне ж рз шт езже fe жүр 

+160 PRINT TAB(7)"[BLUE][s Q][4" 
"][RVSON][YELLOW] [RED][3" "][YE 
LLOW] [RED][3" "][YELLOW][RVSOFF 
][c *][RVSON][RED][3" "][YELLOW] 

[RED][3" "][YELLOW] [RED][3" "] 
[YELLOW] [RED] " 

“170 PRINT TAB(12)"[RVSON][YELLOW 
] [RED] [YELLOW] [RED] [YELLOW] 
[RED] [YELLOW] [RED] [RVSOFF] [R 
VSON][YELLOW] [RED] [RVSOFF] [RV 
SON][YELLOW] [RED] [YELLOW] [RED 
] [YELLOW] [RED] [YELLOW] [RED] 
[YELLOW] [RED] " 

*180 PRINT TAB(12)"[RVSON][YELLOW 
] [RED][3" "][YELLOW] [RED][3" " 
][RVSOFF] [RVSON][YELLOW] [RED] 
[RVSOFF] [RVSON][YELLOW] [RED] 
[RVSOFF][sEP][RVSON][YELLOW] [RE 
D] [YELLOW] [RED] [YELLOW] [RED] 


+190 PRINT TAB(4)"[c 3][s 0][7" " 
][RVSON][YELLOW] [RED] [RVSOFF] 
[RVSON][YELLOW] [RED] [YELLOW] 
[RED] [RVSOFF] [RVSON][YELLOW] [ 
RED] [RVSOFF] [RVSON][YELLOW] [R 
ED] [YELLOW] [RED][c *][YELLOW] 
[RED] [YELLOW] [RED] [YELLOW] [R 
ED] [YELLOW] [c *]" 

+200 PRINT TAB(12)"[YELLOW][c *][ 
RVSON][RED] [RVSOFF] [YELLOW][c 
*][RVSON][RED] [RVSOFF][YELLOW] 
[c *][RVSON][RED] [RVSOFF][YELLO 
W] [c *][RVSON][RED] [RVSOFF][YE 
LLOW] [c *][RVSON][RED] [RVSOFF] 
[YELLOW][c *][RVSON][RED] [RVSOF 
F][YELLOW][c *][RVSON][RED][3" 
"][RVSOFF][YELLOW][c *][RVSON][R 
врз" "J" 

+210 PRINT:PRINT TAB(8)"[GREEN]DE 
SIGNED BY[A4"."][c 2]BOB LLORET": 
PRINT 

+220 PRINT TAB(12)"[YELLOW]PRESS 
[c 3]F1 [YELLOW]TO START" 

*230 POKE 49522,1:РОКЕ 49523,5:Р0 
KE 49524,34:POKE 49525,20:POKE 4 
9526,24 

+235 POKE 53265,PEEK(53265)0R16 

+240 POKE 49527,1:SYS 49152:FOR D 
=1 TO 90:КЕХТ D 

-270 GET A$:IF A$<>"[F1]" THEN 24 


sitalia.ne' 


eS А ы аа ыы 


0 
*320 
“324 
“325 


POKE 53265,PEEK(53265)4ND239 
КЕМ = = = 
REM **®** 
“326 REM = 
“330 PRINT "[CLEAR 
:РОКЕ 53281,0 

“340 L$="(HOME][23"[DOWN]"]" 

“350 FOR А=1 TO 75:X-INT(RND(1)*7 
20)41:C2INT(RND(1)*6)42 

+360 POKE 55296%Х,С:РОКЕ 10244X,4 
6:NEXT А 

“365 PRINT LEFT$(L$,19)"[BLUE][40 
"Ге T]"]" 

*370 PRINT LEFT$(L$,22)"[RVSON][W 
HITE][9" "][RVSOFF][11" "][CYAN] 
[RVSON] SCORE " 

*371 POKE V+21,53:SR=51:GOTO 375 

“372 РОКЕ V+21,37:SR=35:GOTO 375 

+373 POKE V+21,5:SR=3 

“375 GOSUB 620 

“380 POKE 49522,1:POKE 49523,0:Р0 
КЕ 49524,39:РОКЕ 49525,0:РОКЕ 49 
526,18 

«385 POKE 53265,PEEK(53265)0R16 

“390 Ү1-30:РОКЕ V+5,Y1:POKE 49527 
,1:G0SUB 540 


PLAYFIELD **** 


POKE 53280,0 


+394 REM ===== peer 
+395 REM **** MAIN LOOP eee 
396 REM sesessses 
+400 SYS 49152 

+401 A-INT(RND(0)*3)4601:0N A-601 


GOSUB 601,600 
*405 POKE 2042,195:В-В%1:ІҒ В=4 Т 
HEN GOSUB 610 
*410 JV=PEEK(56320):FR=JVAND16:JV 
=15-(JVAND15) 
+420 IF JV=2 THEN Ү-Ү42:ІЕ Ү>-180 
THEN Y-180:GOSUB 620 
*430 IF FRX»16THENX4«95:Y4-Y-2:PO 
KEV+12,X4:POKEV+13,Y4:POKEV+21,S 
R+66:GOTO 900 
*440 IF JV=1 THEN Y-Y-2:IF Y<=48 
THEN Y-48 
*445 IF Ү1<=50 THEN Ү1-50 
*446 IF Ү1>-174 THEN Y1-174 
*450 POKE V+1,Y:POKE V+5,Y1:POKE 
2042,194 
*460 GOTO 406 
*485 REM -- 


*4960 REM **** SAUCER EXPLOSION ** 
жж 
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+495 REM ====== 
+500 SYS 49152:POKEV+2,X1:POKEV+3 
, Y1:POKE2042,193:FORD-1TO50:NEXT 
*501 SYS 49152:POKE SI,0:POKESI+1 
, 0: POKESIA4, 16 
*504 FOR А-15 TO 10 STEP -.5 
*505 POKESI424,A:POKESI44,129:POK 
ESI+1,3:POKE SI,5:POKESI+5,11 
+506 NEXT A:SYS 49152:HS=HS+100 
510 FOR Del TO 5:NEXT:SYS 49152: 
РОКЕ V+21,SR-2 
*515 PRINT LEFT$(L$,22)TAB(28);"[ 
CYAN]";HS:SYS 49152 
*520 POKE SI,0:POKESI+1,0:POKESI+ 
4,16:GOTO 380 
oe add ШЕКЕ — 
*530 REM *"** NEW SAUCER жж 
оба Hd etc на а дас ЖЭШ 
+540 POKE 51%24,2:РОКЕ 51+5,64:РО 
KESI46,130:POKE SI+1,17:POKESI+4 
,129:POKESI,37 
*550 SYS 49152:C-INT(RND(0)*3)43: 
POKEV+38,C:POKE V+41,1:POKE V+37 
2 
] 
+555 POKEV+21,SR+2:POKE 2042,195 
+560 SYS 49152:Y1-Y143:IF Ү1>-100 
*(C*2) THEN Yle1004(C*2):RETURN 
*570 POKE 2042,194 
*580 POKE V45,Y1:GOTO 555 
*600 SYS 49152:Ү1=Ү1+7: RETURN 
*601 SYS 49152:Y1-Y1-7:RETURN 
*607 REM ======================== 
+608 REM **** FUEL MONITOR 
$609 REM ============ = 
+610 SYS 49152:F=F-1:POKEF, 
IFF=56070THENFORZ=56063TOF-1:POK 
EZ,2:NEXT 
*612 IF F-56063 THEN HeY:GOTO 650 
“615 RETURN 
+620 PRINT LEFT$(L$,20)" [YELLOW] 
[RVSON] FUEL [PURPLE][32" "]" 
*630 F-56095:B-0:RETURN 


REM ** SPACE SHIP EXPLOSION 


REM ===== 


+650 РОКЕ 2040,193:POKEV421,SR-2: 
FORD=1 TO 100:NEXT:POKE V+29,1:P 
OKEV+23,1 

+660 SYS 49152:POKE SI,0:POKESI41 


Ittp: 
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»9:POKESI+4,16:CO=CO+1 
*670 FOR A=15 TO 8 STEP -.5 
“680 POKESI+24,A:POKESI+4,129:POK 
ESI+1,3:POKE SI,5:POKESI45,11 
“690 NEXT A:SYS 49152 
“700 FOR р=1 TO 45:NEXT:SYS 49152 
: POKEV+29,9;POKEV+23,9 
“710 POKE SI,0:POKESI+1,0:POKESI+ 
4,16:POKEV+21,SR-3 
+711 IF CO-1 THEN 720 
“712 IF CO-2 THEN 800 
+713 IF CO=3 THEN 1000 
*717 REM ======================== 


“718 
жж 


47719 


"720 


REM **** 2ND SPACE SHIP ** 


REM ======ш=шишшш=шшшшшшшшщшшшшшш 


FOR р=1 TO 1000:NEXTD 

“730 Ү2-Ү2-1 

“740 РОКЕҮ+9,Ү2:ТЕ Y2<=76 THEN Y2 
276:Y-Y2:G0T0760 

“750 GOTO 730 

“760 POKE 2040,192:РОКЕ V+39,5:PO 
KEV+21,33:POKE V+1,Y 


“770 Ү1=30:РОКЕ V+5,Y1:GOTO 372 
°797 КЕМ ==============а========= 
+798 REM **** 3RD SPACE SHIP %% 
жж 

+799 REM «ввяшашшшшшшшшшашшшшшшш- 
«800 FOR D=1 TO 1000:КЕХТ D 

“810 Х3=Х3+1 

«820 POKE Ү+10,Х3:1ІЕ X3=60 THEN 


FOR 
“830 
+840 
“850 

«ҮЗ: 


D=1 TO 500:КЕХТ D:GOTO 840 

GOTO 810 

Y3-Y3-1 

POKE V+11,Y3:IF Y3=76 THEN Y 

GOTO 870 

*860 GOTO 840 

*870 POKE 2040,192:POKE У%39,6:Р0 
KE V+21,1:POKE У-1,Ү 

“880 Ү1-30:РОКЕ V+5,Y1:GOTO 373 

+900 SYS 49152:FOR А-1 TO 25:Х4-Х 
445:POKEV+12,X4:NEXT A:SYS 49152 
:POKEV+21,SR+2 

+919 IF PEEK(V430)AND64-64 THEN 5 
00 

«920 GOTO 440 

+1000 POKE V*21,0:PRINT"[CLEAR]": 
POKE 53280,0:POKE 53281,7 

“1010 FOR А-1 TO 8 


“1020 PRINT LEFT$(L$,3)TAB(12)"[2 
0" "у" 

“1025 FOR D=1 TO 150:NEXT D 

*1030 PRINT LEFT$(L$,3)TAB(12)"[P 
URPLE]COMPUTER REPORT" 

*1035 FOR D=1 TO 150:NEXT D:NEXT 
А 

“1040 IF Н5<-5000 THEN 1060 

“1045 PRINT БЕРІНДЕ 7)TAB(8)"[BL 
ACK]S CORE ";HS 

*1050 М56$="[5" "]CONGRATULATIONS 
[5"."]YOUR MISSION[8" "]WAS А SU 
CCESS 11" 

*1055 GOTO 1200 

*1060 MSG$="[5" "]MICROZ HAS DEFE 
ATED YOU AGAIN !!" 

*1070 PRINT РЕК, 7)TAB(8)"[BL 
ACK]S CORE "5; 

*1200 FOR A-1 TO ка 

“1210 PRINT "[PURPLE]";LEFT$(L$,1 
9) LEFT$(MSG$,A) 


“1220 FOR р=1 TO 150:NEXT D:NEXT 
A 

“1230 END 

+3980 REM ======================= 
“3990 REM **** SPRITE DATA %%%ж 
"3995 REM ======================= 
“4000 FOR 51=12288 ТО 12350:READ 


D1:POKES1,D1:NEXT 51 
“4005 ФАТА 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
*4010 DATA 240,56,0,124,68,0,63,2 
55,224,63,255,252,63,255,255 
*4015 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0 
*4020 POKE V439,2:POKE 2040,192:P 
ОКЕ V,X:POKE Ү+1,Ү 
*4025 FOR S2-12352 TO 12414:READ 
D2:POKE S2,D2:NEXT 
*4030 DATA 128,0,0,64,0,24,104,0, 
57,52,48,114,26,56,100,14,184,20 
0,2 
*4035 DATA 185,0,0,178,0,252,176, 
58,240,32,252,1,1,255,126,0,0,16 
,132 
+4049 DATA 15,35,4, 64,70,6,32,140 
,34,56,24,182,92,51,182, 110,101, 
172 
*4045 DATA 82,73,176,0,0,128,0 
+4050 POKE 2041,193:POKE Үз40,2 
+4060 FOR S3-12416 TO 12478:ВЕАр 
CH:POKE S3,CH:NEXT 
-4070 DATA 0,0,0, 0,0,0,0,0,0,0,0, 


0,0,255,0,3,255,192,15,255,240,6 
3,255,252 

*4080 DATA 255,255,255,85,85,85,1 
87,187,187,85,85,85,255,255,255 

+4090 DATA 63,255,252,15,255,240, 
3,255,192,0,255,0,0,0,0,0,0,0,0, 
0,0,0,0,0 

*4100 POKE 2042,194:POKEV428,4 

*4110 POKE V+4,X1:POKE V45,Yl 
*4120 FOR 54-12480 TO 12542:READ 
D4:POKE S4,D4:NEXT 

“4130 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,255,0,3,255,192,15,255,240,6 
3,255,252 

«4140 DATA 255,255,255,85,85,85,2 
38,238,238,85,85,85,255,255,255 
“4150 DATA 63,255,252,15,255,240, 
3,255,192,0,255,0,0,0,0,0,0,0,0, 
0,0,0,0,0 

“4160 POKE 2043,195:POKE V+41,1:P 
OKEV+28,4:POKE V+37,5:POKEV+38,4 
“4170 FOR 55-12544 TO 12606:READ 
D5:POKES5,D5:NEXT S5 

+4180 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
“4190 DATA 240,56,0,124,68,0,63,2 
55,224,63,255,252,63,255,255 
“4200 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0 

“8210 РОКЕ2044,196:РОКЕУ-43,5:РОК 
EV+8,X2:POKEV+9,Y2 

“4220 FOR 56-12608 TO 12670:READ 
D6:POKES6,D6:NEXT S6 

*4230 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
+4240 DATA 240,56,0,124,68,0,63,2 
55,224,63,255,252,63,255,255 
+4250 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0 

“4260 POKE2045,197:POKEV+44,6:POK 
ЕУ-10,Х3:РОКЕУ%11,Ү3 

+4270 FOR 57-12672 TO 12734:READ 
D7:POKE S7,D7:NEXT S7 

“4280 DATA 0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0 

*4290 DATA 0,0,0,0,0,0,0,0,0,255, 
255, 255% 0,0,0,0,0,0,0,0,0,0,0, 5, 
0,0, 

46. "DATA 0,0,0,0,0,0 

*4310 POKE 2046, 198: POKEV+45, 2 

“4320 RETURN 
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IMPORTANT 
Before typing in an Ahoy! program, refer to the 
first two pages of the program listings section. 


24990 REM ** ML SCREEN SUBROUTINE 
ж 


“4995 REM =s=s===== 
“4999 FOR I=1 TO 4:READ A:NEXT:RE 
AD LO,HI:FORI-LO TO HI:READX:POK 
E I,X:NEXT 

+5000 DATA 11507,12573,12522,1100 
1 


“5005 DATA 49152, 49528 
“5006 RETURN 
“5010 DATA 174,114,193,224,3,144, 
3,76,117,192,188,114,193,140,121 
193,174 

«5020 DATA 118,193,232,202,32,30, 
193,172,121,193,173,119,193,201, 
2,208,10 

“5030 DATA 169,32,72,173,33,208,7 
КРО T 490:72:2/17,92,72) 

) 

*5040 DATA 116,193,240,20,200,177 
,90,72,177,92,136,145,92,104,145 
,90,200 

“5050 DATA 204,116,193,208,238,24 
0,18,136,177,90,72,177,92,200,14 
5,92,104 

“5060 DATA 145,90,136,204,115,193 
,208,238,173,119,193,201,0,208,5 
5,104,104 

*5070 DATA 76,111,192,104,145,92, 

.104,145,90,236,117,193,208,160,9 
6,172,116 

*5080 DATA 193,200,189,114,193,17 
0,32,30,193,173,120,193,201,2,20 
8,19,136 

“5090 DATA 169,32,153,122,193,173 
,33,208,153,162,193,204,115,193, 
208,239,240 

+5100 DATA 16,136,177,90,153,122, 
193,177,92,153,162,193,204,115,1 
93,208,240 

-5110 DATA 236,117,193,240,37,202 
,32,30,193,172,116,193,200,136,1 
77,90,72 

+5120 DATA 177,92,32,48,193,145,9 
2,104,145,90,32,56,193,204,115,1 
93,208 

-5130 DATA 234,236,117,193,208,22 
1,240,46,202,206,118,193, 232,32, 
30,193,172 

+5140 DATA 116,193,200,136,32,48, 
193,177,99,72,177,92,32,56,193,1 
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45,92 
“5150 DATA 104,145,90,204,115,193 
,208,234,236,118,193,208,221,238 
,118,193,232 
“5160 DATA 32,30,193,173,120,193, 
201,0,240,20,172,115,193,136,200 
‚185,162 
+5170 DATA 193,145,92,185,122,193 
,145,90,204,116,193,208,240,96,1 
89,89,193 
“5180 DATA 133,91,24,105,212,133, 
93,189,64,193,133,90,133,92,96,7 
2,152 
+5190 DATA 24,105,40,168,104,96,7 
2,152,56,233,40,168,104,96,0,40, 
80 
+5200 DATA 120,160,200,240,24,64, 
104,144,184,224,8,48,88,128,168, 
208,248 
“5210 DATA 32,72,112,152,192,4,4, 
4,4,4,4,4,5,5,5,5,5 
“5220 DATA 5,6,6,6,6,6,6,6,7,7,7, 
7,7,3,0,4,0 
“5230 DATA 4,1,1 


BUG REPELLENT LINE CODES 

R SPACE РАТ ROL 

LINE # 2:DM LINE # 200:Ү0 
LINE # 3:JB LINE # 210:0M 
LINE # 4:GH LINE # 220:JN 
LINE # 5:01 LINE # 230:FL 
LINE # 7:HL LINE # 235:АМ 
LINE # 8:BG LINE # 240:AH 
LINE # 9:HL LINE # 270:MN 
LINE # 10:00 LINE # 320:FC 
LINE # 20:KK LINE # 324:KC 
LINE # 30:СЕ LINE # 325:LL 
LINE # 40:01, LINE # 326:KC 
LINE # 50:1М LINE # 

LINE # 60:ED LINE # 

LINE # 70:IP LINE # 

LINE # LINE # 

LINE # LINE # 

LINE # LINE # 

LINE # LINE £ 

LINE # LINE # 

LINE # LINE £ 

LINE # LINE # 

LINE £ LINE # 

LINE # LINE # 

LINE # LINE # 

LINE # LINE # 

LINE # LINE f 
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IMPORTANT | 


Before typing in an Ahoy! program, refer to the 


two pages of the program listings section 


LINE # 396: LINE # 712:EE LINE # 4040:ID LINE % 4990:0H 
LINE % 400: LINE # 713:HG LINE # 4045:BD LINE % 4995:ME 
LINE # 401:K LINE % 717:МЕ LINE # 4050:NI LINE # 4999:BN 
LINE # 405: LINE # 718:PD LINE # 4060:FE LINE % 5000:MD 
LINE £ 410: LINE # 719:ME LINE # 4070:CP LINE % 5005:0В 
LINE # 420; LINE # 720:АС LINE # 4080:0P LINE # 5006:1M 
LINE % 430: LINE % 730:JD LINE # 4090:IJ LINE # 5010:GI 
LINE % 440: LINE # 740:AF LINE # 4100:CK LINE # 5020:EL 
LINE # 445: LINE # 750:CG LINE # 4110:HF LINE # 5030:CN 
LINE # 446:K LINE # 760:JG LINE # 4120:IL LINE % 5040:CI 
LINE % 450: LINE # 770:NK LINE # 4130:CP LINE # 5050:АК 
LINE # 460: LINE # 797:ME LINE # 4140:NE LINE # 5060:KD 
LINE % 485: LINE # 798:AA LINE # 4150:IJ LINE % 5070:0J 
LINE % 490: LINE # 799:МЕ LINE # 4160:LL LINE # 5080:0Р 
LINE # 495 LINE # 800:А6 LINE # 8170:ҒА LINE # 5090:KB 
LINE # 500: LINE # 810:LG LINE # 4180:ND LINE # 5100:CE 
LINE # 501: LINE # 820:ND LINE # 4190:JG LINE # 5110:MG 
LINE % 504: LINE # 830:CN LINE % 4200:DH LINE % 5120:HJ 
LINE % 505: LINE # 840:KL LINE # 4219:0A LINE # 5130:GF 
LINE # 506: LINE # 850:АЕ LINE # 4220:KN LINE # 5140:1С 
LINE # 510:40 LINE # 860:CI LINE # 4230:ND LINE # 5150:AL 
LINE # 515:MM LINE # 870:MN LINE % 4240:JG LINE # 5160:DK 
LINE # 520:JI LINE % 880:NN ІЛМЕ % 4250:DH LINE # 5170:ЕР 
LINE # 525:PM LINE 4 900:CK LINE % 4260:AF LINE % 5180:1A 
LINE # 530:IK LINE # 910:KK LINE # 4270:BG LINE £4 5190:LL 
LINE % 535:PM LINE % 920:CE LINE # 4280:FC LINE # 5200:LK 
LINE # 540:1I LINE # 1000:ЕА LINE # 4290:IE LINE % 5210:JG 
LINE # 559:CA LINE # 1010:IL LINE # 4300:JC LINE # 5220:LE 
LINE # 555:AM LINE # іМЕ LINE # 4310:РР LINE # 5230:HP 
LINE % 560:HA LINE £ F LINE # 4320:IM LINES: 218 
LINE # 570:ED LINE £ K LINE % 4985:ME 

LINE % 580:MN LINE # J 

LINE £ 600: # 0 

LINE % 601: # G 

LINE # 607: # 0 

LINE % 608: # 1055:FE 

LINE # 609: E d 

LINE % 610: # 

LINE % 612: E # 

LINE # 615: A 

LINE # 620: A 

LINE # 630: # 

LINE # 639: # 

LINE # 640: # 

LINE # 641: # 

LINE # 650; # 

LINE И 660: # ои already һауе a subscription to Ahoy! 
LINE # QUA # You're not going to pay newsstand price when you 
БІНЕ А 95: сап save almost $1.00 а copy! But чь the perfect sea- 
LINE 2 700; н ѕоп to enter a subscription for a friend ог relation. 
LINE # 71 b: : See the card between pages 82 and 83 for detail 
LINE £ 711: # 
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PRINTER INTERFACING 
REVISITED 


Continued from page 21 
will set the print head to the 256+15=271 dot 
position. 


THE REPEAT GRAPHICS COMMAND 

The 1525 can be instructed to repeat a graphic dot 
pattern up to 255 times. This can be very useful for 
generating graphs and bar charts. The CHRS(26) 
code is followed by a single byte which specifies the 
number of repetitions. The pattern to be repeated is 
sent as a single byte immediately afterward. The fol- 
lowing program demonstrates the proper application 
of the dot position and graphic repeat commands. 


10 OPEN4,4 

20 PRINT#4,CHR$(8); 

30 PRINT£4,CHR$(27)CHR$(16)CHRS$(O 
)CHR$(100); 

Ben esi OES (26) CHRS (50) CHESCA 
5 

50 PRINT#4,CHR$(27)CHR$(16)CHR$(1 
)CHR$(200); 

Bi PRINT£4,CHR$(26)CHR$(50)CHR$25 
70 PRINT#4,CHR$(15) 

80 CLOSE4 


Line 30 moves the printhead to the 100th dot posi- 
tion. Line 40 prints a solid bar for the next 50 dot 
positions. Line 50 moves the printhead to the 
1*256+200=456th dot position. This forces the 50 
dot bar in line 60 to overflow to the next printed 
line. Remember, a line on the 1525 is 480 dots long. 


PRINTING HIGH RESOLUTION 
GRAPHICS 

In text mode, the 1525 prints six lines to the inch. 
Each character is made up of a matrix which is six 
dots wide and seven dots high. When high resolution 
graphics mode is selected by the CHRS(8) code, the 
line spacing is changed to nine lines per inch. In 
this mode, successive rows are printed adjacent to 
each other. Any data following the CHR$(8) code 
will be interpreted as printable graphic data if the 
byte value is greater than 127. Byte values less than 
128 are either ignored or are one of the command 
codes described above. The following program dem- 
onstrates the graphics mode by printing the first let- 
ter of the Ahoy! logo. 


10 DATA192,160,144,136,140,138 
20 DATA139,142,140,152,176,224 
30 DATA192 

40 DATA129,131,134,132,133,131 
50 FOR І-0 ТО 12 


oldc 


60 READ R1 
70 R1$=R1$+CHR$(R1) 

80 NEXT I 

90 FOR I-0 TO 5 

100 READ R2 

110 R2$=R2$+CHR$(R2) 

120 NEXT I 

130 OPEN4,4 

140 PRINT£4,CHR$(8)R1$ 

150 PRINT#4,CHR$(27)CHR$(16)CHR$( 
©)CHR$(12)R2$CHR$(15) 

160 CLOSE 4 


The data in lines 10 through 40 make up the actu- 
al image. The following figure shows how it is 
derived. 


DOT 
VALUES 


ROW 
ONE 


ROW 
TWO 


BYTE 
VALUES 


Each pass of the printhead, in graphic mode, can 
print a swath exactly seven dots high. Each vertical 
seven-dot column is represented by a single byte of 
data. The value of this byte is dependent on which 
dots are to be printed. Referring to the figure, the 
top dot has a value of one and the bottom dot has a 
value of 64. The value of 128 is added in to tell the 
printer that this is graphic data. For a more detailed 
example of high resolution printer graphics, see 
Lower Case Descenders with the УІСІ515/1525 Print- 
ers in the April issue of Ahoy! 

The examples presented above require either a 
Commodore 1525 printer or a dot matrix printer 
with a graphic interface. In February we will be tak- 
ing a close look at the latest offerings in the Com- 
modore printer interface market. O 
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о you ever wonder what is going оп іп- 
side your computer when it executes a 
BASIC program? In previous columns we 
have seen how numbers and arrays are 
stored. We have also taken a quick look at the way 
the program itself is stored. This month we will see 
some of the details of program storage. We will in- 
vestigate ways of snooping below the surface of BASIC. 

First let's discuss the concepts of pointers and ad- 
dress storage in BASIC. An eight-bit microprocessor 
such as the 6510 in the C-64 reads data one byte 
(eight bits) at a time. There are 256 combinations of 
eight bits, ranging from 0 (0000 0000) to 255 (ІШ 
ШІ). The processor would be very limited if it could 
access only 256 different memory locations. Conse- 
quently eight-bit processors use two bytes to герге- 
sent addresses. This gives the processor access to 
65536 (2 raised to the 16th power) possible memory 
locations, provided that memory exists. 

The two bytes which make up an address are 
called the most significant byte (MSB) and the least 
significant byte (LSB). In a two-digit decimal num- 
ber (for example 37), the most significant digit (3) 
actually represents ten times its value. The value of 
the number is then 10*3 + 7. Similarly in a two- 
byte quantity, the most significant byte actually rep- 
resents 256 times its value. 

For example, if the MSB is 30 and the LSB is 
135, the value of the quantity is 30*256 + 135 or 
7815. The smallest two byte quantity is MSB=0, 
LSB=0 which has a value of 0. The largest two byte 
quantity is MSB=255, LSB=255 which has a value 
of 65535 (you should calculate it to make sure). 

There is one twist. When a two byte quantity is 
stored in memory, it is stored (contrary to common 
sense) with the LSB first and the MSB second. If 
the computer reads two bytes 100 and 10 when it is 
expecting an address, it determines that the address 
is actually 100 -- 256*10 or 2660. 

The BASIC interpreter is a program in ROM 
which interprets and executes the instructions which 
you type into RAM as your BASIC program. BASIC 
looks into specific RAM locations to find out infor- 
mation about your program. For example, RAM lo- 
cations at addresses 43 and 44 contain a two byte 
“pointer” to the start of your BASIC program in RAM. 
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Exploring the 


What is a pointer? It is nothing more than a two 
byte address. Pointers are stored in standard LSB, 
MSB sequence. If for example you type: 

PRINT PEEK(43) PEEK(44) 

in direct mode, you will see the LSB and the MSB 
of the address where your BASIC program begins 
(or will begin). If your results are 1 and 8, that 
means that your program starts in RAM at address 
2049. When we refer to the value of the pointer at 
location 43, we actually mean the value of the byte 
at address 43 added to 256 times the value of the 
byte at address 44. The following program defines a 
function FNPT(M) in line 10 which evaluates the 
pointer at address M. 

1 REM...BASIC-LOOK... 

10 DEFFNPT(M)=PEEK(M)+256*PEEK(M+ 
1) 

20 MI-FNPT(43):M2-FNPT(45)-1 


Inner Structure of a BASIC Program 


30 FORMEM-MITOM2 

40 P=PEEK(MEM) 

50 PRINTMEM;P; 

60 IFP4310RP»128THENPRINT:GOTO80 
70 PRINTCHR$(P) 

80 NEXT 

If you type it exactly as shown including line 1 and 
without spaces, you should see the following results. 
The program starts at address 2049 and ends at ad- 
dress 2206. This program displays each address and 
the value of the byte stored in each address of this 
program. Also for bytes which have a character 
equivalent, that character is displayed. 

Notice that the pointer at address 45 gives the ad- 
dress of memory just beyond the BASIC program. 
That is where variables and their values are stored. 
You may also notice that there arent any BASIC 
statements as there are when you list the program. 
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In fact about the only recognizable items are variable 
names and assignment values as well as the words in 
the REM statement. 

The BASIC interpreter converts your program's 
text into a tokenized format for storage. Each state- 
ment has its own one byte code or token. For exam- 
ple, after you run the previous program, the NEXT 
statement in line 80 will be near the bottom of your 
screen, disguised as code 130 in address 2203. Fur- 
ther up you should see the PRINT and CHR$ key- 
words stored as 153 and 199 respectively. 

You may run the following program to determine 
the tokens for all BASIC statements and keywords. 

1 REM 540..,1..,2..,32.,4-.:54-,6 
4.,»7..,8..,9.. 

2 5-120 REM > STARTING CODE 

10 DEF FNPT(M)=PEEK(M)+256*PEEK(M 
+1) 
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Just when you've escaped Castle Wolfenstein™ 
MUSE introduces another game 
to capture your imagination. 


Announcing 
Beyond Castle Wolfenstein™ 


Creating the original Castle Wolfenstein™ was indeed 
а challenge. Developing а sequel to our award winning 
top seller was even tougher. But we didn't surrender. 
Now there's Beyond Castle Wolfenstein™—an action/ 
adventure classic in the Castle Wolfenstein™ tradition. 

So if you take your strategy games seriously, accept our 
challenge to play Beyond Castle Wolfenstein" —the game 
you've been waiting for. 

MUSE Software also offers an exceptional selection of 
quolity, critically. acclaimed home management, per- 


Soper-Test* Prolessionol, Rescue Squod™. 


sonal productivity, educational and recreational software. 

There's Super-Text® Professional word processor—the 
highly recognized top seller that will make all your writing 
easier. Elementary Math™ and Antonym Antics™—two 
great teaching programs that assure your child a head 
start in learning. And Space Taxi™—the fast-paced, 
action game of 25 full color screens that will test even the 
best of drivers. 

As always, you can expect the exceptional... from 


MUSE Software. 
M U 9 Ғ 


SOFTWARE 
347 N. Charles Street 
Baltimore, Maryland 21201 
(301) 659-7212 


Commodore is a registered trademark of Commodore Business Machines. 
Reader Service No. 48 
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“20 М1=ЕМРТ(43) :М0=М1+10 

“30 FOR №0 TO 9 

"35 IF (S+N=204) OR (S+N>255) THE 
М POKE М0,32 : GOTO 50 

“40 POKE MO,S+N 

“50 М0=М0+4 

“60 NEXT 

“70 LIST 1-2 

Type line | exactly as shown. BASIC tokens have 
values starting at 128. This program POKEs ten con- 
secutive values into the RAM locations coinciding 
with the REM statement in line 1. The rather ob- 
scure display when you run this program represents 
a listing of keywords and their corresponding code 
number, The starting value 5 is listed in line 2. The 
first eight symbols shown are regular graphics char- 
acters, Item 8 is the keyword END, and item 9 is 
the keyword FOR. This says that END has a token 
value of 128, and FOR's value is 129. 

Now change the 120 in line 2 to 130 and run the 
program again. This time the keywords from NEXT 
to IF are displayed, corresponding to tokens 130 
through 139, You may continue changing line 2 in 
steps of ten up to 250 (you can't POKE а value larg- 
er than 255). You may modify this program to send 
the results to a printer if you prefer. 

In this program, MI stores the starting address of 
program storage. Sequential values are POKEd into 
memory starting at address MI +10. Why MI +10? 
То answer that, we must look more closely at the 
way our programs are stored in memory. 


BASIC STORAGE 

The diagram on page 91 (Figure 1) shows the 
structure of a BASIC program. Each square repre- 
sents a memory cell. The addresses of the cells are 
identified. The contents of the cells depend upon 
which particular program is in memory. 

The pointer at address 43 tells where the program 
begins. The first two bytes of the program are an- 
other pointer. This pointer shows where the second 
line of the program begins. The format is the same 
for each program line. The first two bytes of each 
line point to the next program line. The second pair 
of bytes store the line number of the line (in LSB, 
MSB form). The program text is stored in the re- 
maining bytes of each line. The end of each line is 
indicated by one byte of zero. 

The last program line also starts with a pointer. 
This pointer points to two consecutive bytes of ze- 
roes. That is the signal for the computer to identify 
the end of the program. If you rerun the first pro- 
gram, you will see three consecutive bytes of zero, 
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опе corresponding to the end of line 80 and two for 
the end of the program. Notice that the program 
storage is in contiguous memory locations. There is 
no gap in memory between the end of one line and 
the beginning of the next. 

Now we can go back and see why the previous 
program works. MI is the starting address of the 
program. The pointer to the second line is stored in 
locations МІ and М1+1. The line number of the 
first line is stored in locations М1--2 and МІ+3, 
The text of the first line begins at location MI+4. 
The token for the REM statement is іп МІ--4. The 
space after the REM is іп МІ--5. The following dia- 
gram shows how the first bytes of the text in the 
first line are stored: 

MI +4 +5 36 +7 +8 +9 +10 +11 +12 +13 +14 +15 
REM (space) 8 + 0 MATES А 


When we POKE a value into М1+10, we are геріас- 
ing the second period following the “0” with that 
value. The next value we POKE goes into MI+14 
which replaces the second period after the “I”. Keep 
in mind that, even though the listing of the line 
shows all the characters of the keyword, each key- 
word token is stored in memory as a single byte. 

The way that pointers work seems a bit magical. 
When we evaluate the pointer at address 43, that is 
FNPT(43), we get an address, say Al. Evaluating the 
pointer at address AI gives another address A2. If 
we wanted to find the starting address of the third 
line of the program, we could evaluate 


АЗ - FNPT(FNPT(FNPT(43))) 
where 
FNPT(M) = PEEK(M) + 256*PEEK(M+1) 


Similarly we could evaluate the pointer of the point- 
er of the pointer. . .until we found a value of zero, 
indicating the end of the program. 

Another way to find the end of the program text 
that we have typed is to use the pointer at address 
45. This pointer tells the start of numeric variable 
storage. The end of the program text (not including 
the zero at the end of the last line) is always four 
bytes before that. Consequently, we may find the end 
of our text from the expression 


FNPT(45)-4 


The following program analyzes itself as an exam- 
ple of how we may investigate a program їп situ. 
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+2000 :REM...BASIC LINE LOCATER.. 


е 2005 DEF FNPT(X)=PEEK(X)+256*PEE 


(X+1) 

2010 GOSUB 2200 :REM COUNT # OF L 
INES 

2015 PRINT"THERE ARE"CT"PRGM. LIN 
ES" 

2020 PRINT:INPUT"WHICH PRGM. LINE 
"iN 

2025 IF N>CT OR N<1 THEN 2015 
2030 GOSUB 2500 : REM GET LINE AD 
DRESS 


2040 PRINT"FOR PRGM. LINE"N 

2050 PRINT" LINE # = "FNPT(A+2) 

2060 PRINT" TEXT STARTS AT ADDR - 
"A+4 

2070 PRINT" TEXT ENDS AT ADDR 
"NL-2 

2100 GOTO 2020 

2199 : 

2200 


:REM....COUNT # OF LINES.... 


2201 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2499 
2500 
2501 
2510 
ADDR 
2520 
2530 
2540 


A=FNPT(43) 

CTs) 

IF FNPT(A)-0 THEN2270 
СТ=СТ+1 

A=FNPT(A) 

GOTO 2230 

RETURN 


REM. ..GET ADDR OF NTH LINE.. 


A=FNPT(43) : REM FIRST LINE 
IF N«2 THEN 2560 

FOR 00-2 TO N 

A=FNPT(A) 
2550 NEXT QQ 
2560 NL=FNPT(A) 
T LINE 

2570 RETURN 


:REM START OF МЕХ 


The subroutine at line 2200 shows how a program 
might count its number of lines. The subroutine at 
2500 steps through the specified number of lines (by 
stepping from pointer to pointer). The value of A is 
the address of the start of the Nth line. The line 
number of the Nth line is at locations (A+2) and 
(A+3) and is evaluated just as a pointer is. The text 
in the Nth line starts at address (A+4). NL is the 
pointer to the next line as defined in line 2560. Con- 
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sequently the end of the text in this line is at address 
(NL—2). 

Instead of searching for the Nth line in a program, 
we might prefer to search for the line with a given 
line number, We now know where to find the line 
number of each line. Since it is in “pointer format,” 
we must first break the desired line number into 
LSB, MSB form. The following program does that. 


“1 :REM CONVERT # TO LSB,MSB FORM 


-2 
58 
4 
e5 

) 
*6 


DEF FNMS(X)-INT(X/256) 

DEF FNLS(X)=X-256*INT(X/256) 
INPUT"CONVERT WHAT NUMBER";X 
PRINT"LSB, MSB:"FNLS(X);FNMS(X 


GOTO 4 


Line numbers may range from 0 to 63999 (some- 
what less than the 65536 possible values permissible 
with two bytes). The LSB and MSB values for 
63999 are 255, 249. You may enter numbers as large 
as you like into this program, but the MSB will be 
larger than 255 for numbers greater than 65535. 

This program and the subroutines from the previ- 
ous programs are purely illustrative since they only 
work on themselves. To really utilize these ideas, we 
could put these routines at the end of some other 
program we wish to analyze. Now that we know 
how pointers work, let's look at a better way of 
combining these, or any other utilities, with other 
programs. 


THE GREAT MERGER 

When we load a program into memory, BASIC 
checks the pointer at address 43 (remember it?) to 
find where the program should start. After it is 
loaded, the pointer at address 45 is updated to show 
where the program ends, actually where numeric 
variable storage begins, as we have already 
discussed. 

It is an easy task for us to change those pointers 
and thereby to join two programs into one. The pro- 
cedure is this: 

1. In direct mode, type A = PEEK(43) : B = 
PEEK(44) : PRINT А.В 

2. Load the first program (the one with smaller 
line numbers) into memory as you normally 


would. 

3. Type C — PEEK(45) : D — PEEK(46) : 
PRINT C.D 

4a. If C is not 0 or 1, type POKE 43C—2 : 
POKE 44,D 
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OR 4b. If C=0 or 1, type POKE 43,C+254 : 


POKE 44,D—-1 


5. Load the second program into memory. 
6. In direct mode, type POKE 43,[А] : POKE 44, 
[B] where [A] and [B] are the values from step 


one, normally 1 and 8. 


Step 1 determines the starting address of the first 


program. C and D are pointers 


10 two bytes beyond 


the end of that program once it is loaded. Step 4 
sets the end of the first program as the start of the 


second program. You do either 
Step 4b is a subtraction with a 


4a or 4b, not both. 
borrow from the 


MSB. Once the second program is loaded into mem- 
ory, BASIC properly sets the pointer at 45. If we 
listed the program now, only the second program 


would be shown because of the 


pointer value at 43. 


By restoring the pointer at 43 back to its initial val- 
ue, we have joined the two programs, and we may 


treat them as one. 


The whole process may be repeated if we want to 
add another program. If successive programs do not 
have sequentially increasing line numbers, the pro- 
grams will load anyway, but BASIC will have trouble 


with the lines out of sequence. 


А simple way around 


this is to list the program and press < Return? for 
each program line in the second program which 


should be contained within the 


first program. You 


will then have duplicate lines but the second line in 


each case will be ignored. 
А better procedure is to renui 


mber your programs 


before merging them so that they will be in sequen- 


tial order. 


Having the ability to merge program segments to- 


gether should encourage you to 
in a modular format and create 
modules. 


CROSS REFERENCE 


write some programs 
others from the basic 


The final program this month may be merged to 
another program you wish to analyze for program 
flow, This program prints out a list of each line 
number which branches to other lines. It also gives 


a list of each line number and 
branch to it. See the listing on 


the lines which 
page 73. 


The program uses the techniques we have just dis- 


cussed, The array LN( ) stores 


information about 


each program line in the following format: 
LN(A 0) is the line number of the Ath line of the 


program, 
LN(A,I) is the count of how 
made by this line. 


many branches are 


LN(A,2) through LN(A,...) are the line numbers 


Continued on page 98 
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Page No. Company Sve, No. 
15 Commodore Business Machines 1 
15 Star Micronics 2 
16 Cardco, Inc, 3 
16 Cardco, Inc. 4 
5 Datasoft 5 
d MEAT 6 
7 rage Concepts, Inc. 7 
38 Cardco, Inc. 8 
39 Loadstar 9 
6 Waveform Corporation 10 
6 Orange Micro Inc. п 
9 EnTech Software 12 
96 Activision 13 
14 Creative Software 14 
14 Victory Software 15 
14 Victory Software 16 
50-51 Sight & Sound Music Software 17 
96 HesWare 18 
HesWare 19 

2253 Protecto Enterprizes 20-31 
49 CVC Online 32 
12 3R Import and Export Corp. 33 
41 Ergo Systems 34 
9 Cheatsheet Products 35 
li Eng Mfg., Inc. 36 
54 37 
14 38 
60 РІЛ Місго 39 
12 Susie Software 41 
13 Mimic Systems Inc. 42 
C2 Cardco, Inc. 43 
57 Datamost 4 
18 Indus Systems 45 
35 HesWare 46 
35 Professional Software 47 
88 Muse Software 48 
с-з Activision 49 
42 Melodian 50 
34 MMG Microsoftware 51 
40 GOSUB of Slidel, Inc. 52 
36 PSIDAC 53 
C4 Koala Technologies Corporation | 54 
8 subLOGIC Corporation 55 
97 Activision 56 
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PRIMER ОМ PRINTERS 


Continued from page 17 

often have optional tractor feed attachments available 
as well. Tractor feed assures smooth, even feed of 
paper through the printer even at high speeds with- 
out the paper shifting. 


NOISE 

Impact printers, both dot matrix and letter quality, 
are noisy machines. As a general rule, the letter 
quality variety is somewhat noisier than the dot ma- 
trix group, but both types do make a considerable 
amount of noise, Using a cushion under the printer 
will lessen the racket somewhat, and there are many 
good printer mats available commercially. Most are 
made up of a spongy rubber, with some having a 
porous “waffle” texture which not only cuts down 
оп the inherent mechanical noise of the printer, but 
lessens the amount of vibration, which also contri- 
butes to the noise level. It’s a good idea to take a 
look at these printer mats when you purchase your 
printer, but there are two things in particular to look 
for: 1) make sure that the mat is large enough to ac- 
commodate the printer properly, and 2) be very sure 
that the mat will not impede the flow of air into any 
vents on the bottom of the printer. This is important, 
because if these vents are blocked, the workings will 
get too hot, and printer failure will result. 


COMPATIBILITY 

Commodore computers transmit PET/CBM ASCII 
codes through their serial ports, which is a modified 
version of standard ASCII. Commodore printers, as 
one would expect, understand this modified code 
dialect perfectly, and thus will operate properly with- 
out the use of an interface. 

Cardco, Inc. offers three letter quality printers, the 
LQ-1, LQ-2, and LQ-3, which are also directly com- 
patible with Commodore computers, since they have 
the necessary interfacing built in. 

Aside from these Commodore and Cardco print- 
ers, a printer interface will be necessary not only to 
connect the two devices physically, but also to 
“translate” the PET/CBM ASCII into the standard 
version of ASCII that the printer will understand. 
You should check what kind of data transmission 
protocol the printer is equipped to handle. The two 
basic groups are RS-232 serial and parallel. These 
two groups are further divided with other versions of 
serial or parallel, e.g. Commodore serial or IEEE- 
488 parallel. 115 necessary to know the protocol of 
the printer so that you may obtain the right type of 
interface. Many of the better line printers will accept 
either serial or parallel protocols, but these printers 
generally cost more, and they're all-round better 
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units. For a more detailed explanation of interfaces, 
as well as more information on these amazing de- 
vices, see Morton Kevelson's article on page 19. 


PRINT VARIETY 

The ability to alter or vary the size and style of 
print is a feature that virtually all printers are cap- 
able of to some extent, more or less depending on 
the individual printer as well as whether it’s dot ma- 
trix or letter quality, 

Most letter quality printers offer optional print 
wheels or print elements to afford you a change in 
what the characters look like, as well as what spe- 
cial characters they may contain. For example, a 

"scientific" print wheel layout might contain such 
characters as pi, degree, and other specialized scien- 
tific or mathematical characters. The standard “сош- 
ier" or "legal" varieties of print wheels contain pret- 
ty much the standard assortment of characters found 
on any good typewriter, while offering such niceties 
as a bullet in place of a math symbol. While the va- 
riety of print wheels for any particular printer is 
somewhat limited, there is still an adequate variety 
of layouts for most purposes. Most letter quality 
printers allow double- or triple-striking characters to 
create а pseudo-bold face, and by substituting a print 
wheel of a different pitch, the print can be changed 
from pica to elite or vice versa. 

Dot matrix printers offer all kinds of goodies in 
the way of altering print formats. Many are capable 
of italicizing, subscripts, superscripts, boldface, un- 
derlining, expanded, or condensed print, in addition 
to the ability to print out the graphics characters of 
your computer. Some of the better dot matrix units 
also have alternate or auxiliary character sets on 


character set, accent marks 
cumflex characters, etc. Additionally, many of these 
units allow you the option to load into memory your 
own custom character set for further specialized 
printing needs. As with all of the other added fea- 
tures, this capability is usually reflected in the price 
of the printer. 


INTERNAL BUFFER MEMORY 

The internal memory, or buffer, of the printer, no 
matter which genre you choose, greatly influences 
the speed of the unit. A printer with a small buffer, 
say 64 characters, can store and print only one line 
of characters at a time, whereas a printer with a 2K 
buffer can store and print an entire page or docu- 
ment at a time. This is an important feature, since 
the more characters the printer can hold in RAM, 
the quicker the computer is freed up from playing 
nursemaid to the printer, thus allowing you to use it 
for other tasks or operations while the printer does 
its thing. On the surface it doesn't seem like a very 
big point, until you have a rather long document or 
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listing to print out, and constantly waiting for the 
printer to catch up with the computer becomes a 
time-consuming ordeal. Many of the printers offer 
the option of installing an additional RAM chip or 
chips by the user if and when the need for more 
buffer memory arises. These printers offer the best 
value in this respect, since you're only paying for 
the buffer memory you actually need, and you only 
pay for it when you need it! 
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COMPARISON CHART 

Below is a chart of the most popular printers, their 
type, features and manufacturers’ suggested list pric- 
es. It is by no means complete, but it does represent 
an excellent cross-section of the more popular brands 
in different price catego AII of these units were 
selected for our comparison because they offer the 
best variety in their particular groups and price 
ranges. Г1 


PRINTER FEATURE COMPARISON CHART 


Paper Mfg. 
Width Buffer [Р 
Mfr.IModel ImageType Speed Paper Feed (max.) ^ Memory Compatibility Price 
Cardco, Inc. daisy wheel 14 cps. friction 13 inches 80 (1 line) ^ parallel & built-in $649.95 
1-1 racers, | Commodore interface 
Cardco, Inc. character 10 cps. friction 8.75 inches 80 (1 line) роге! & built-in $349.95 
19:2 гот characters Commodore interface 
Cardco, Inc. daisy wheel 13 cps. friction 11.5 inches 80 (1 line) ^ parallel & built-in $449.95 
1Q-3 characters Commodore interface 
Epson America, Inc. dot matrix 80 cps. friction! 10 inches 1 line porallel 5495.00 
Epson МХ-80 trador 
Epson America, Inc. Фо! matrix 180 ер. friction/ 10 inches — 2K standard: parallel 5699.00 
Epson FX-80 tractor (with serial) optional: serial 
Star Micronics dot matrix 120 eps. friction? 10 пез 4or8K опг: parollel $399.00 
Gemini 10X tractor optional: serial 
Star Micronics dot matrix 120 cps. — fricion/ 15 inches 8K—expand- standard: parallel 5549.00 
Gemini 15X tractor able to 16K optional: serial 
Okidata dot matrix 80 cps. friction (ғас- 9.5 inches — parallel 5449.00 
Microline 80 tor option) 
Okidata dot matrix — 120 eps. 9-5 inches 2K (option 5:222 and parallel $549.00 
Microline 82A with serial) standard; IEEE-488 
optional 
Commodore dot matrix 50 cps. tador only 8.5 inches 1 line Commodore serial $279.00 
MPS-801 
Commodore dot matrix 60 eps. friction! 8.5 inches 1 line Commodore serial $399.95 
1526 касог 
‘Commodore daisy wheel 17 cps. fridion 13 inches — 2K Commodore serial 549995 
БР5-1101 
Соттодоге dot matrix 60 cps. friction: 8.5 inches — lline ‘Commodore serial $199.95 
MPS-803 standard 
tractor: 
optional 

] ізу wheel 17 cps. fici 13 inch 2K rallel; standard 5395.00 
ШЫ 00 daisy wheel 17 cps. ition inches ERES 
Xerox (Diablo) daisy wheel 60.120 eps. friction 15 inches — 2K serial or parallel $1,995 
Diablo 630 tractor 

AHOY! 93 


ww.oldgamesitalia.ne 


Put the World 
on Hold! 


cares and come 
sailing in the 
exotic Caribbean 


Not a dress-for-dinner floating 
hotel. ..but “barefoot” sailing & 
beachcombing for those with 
adventure in their souls. Lend a 
hand. ..or feet on the rail. Six exciting 
days from $425. Write for your free 
Great Adventure Book 
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aptain Microz’ unprovoked assault on 

your world seven years ago laid most of the 
aste. Since then, you and your 

ors could do nothing but grieve 
age against your enemy, 
too powerful to retaliate against with hope 
of success, But now you've learned through 
interplanetary informants that the evil Cap- 
tain has secretly dismantled most of h 
fleet for retooling, Immediately your forces 
depart for his world, leaving behind a 
skeleton patrol of three fighters. 

What you don't know is that Microz plant- 
ed the rumor that reached your ears. His ships 
lurk nearby, ready to finish destroying your 
world as soon as your armada departs. 

What Microz doesn’t know is that the 
three ships left behind are experimental 
FX-100's, equipped with the pinpoint firing 

асу needed to strike the Captain's ves- 


fellow surv 
and bottle up your 


sels at their only vulnerable point—the stel- 
lar energy cells revolving around their mid- 
dles. Can your three fighters defeat fifty or 
more of Microz'? 


PACE PATROL 


FOR THE 
C-64 


Space Patrol is an arcade-style game which I consider the best I've 
produced to date. It incorporates some of the finer features that the 
C-64 has to offer, such as 3D lettering in the title screen, extensive 
use of sprites, and screen scrolling for that deep space effe 

Load the program and run it. After looking at the title screen press 
F1 and the screen will go blank to draw the playfield. After a few 
seconds the screen goes on and you're ready for action. Use the joy- 
stick in Port 2 to make your ship (on the left hand side of the 
screen) go up or down. The program will control the alien ships 
Your score is kept at the lower right hand corner of the screen. 

Watch your fuel gauge as you do battle. If you run out of fuel, 
your ship explodes and the next of three is brought up. To refuel, 
touch the bottom of the playfield with your fighter 

When your three ships are gone, the game ends and your score is 
displayed in a computer report, along with a message. If you score 
over 5000 the message is good; if under 5000, not so good 

I hope you have as much fun playing Space Patrol as I had programming 
it. A copy on disk or cassette can be obtained by sending $6.00 to 

Robert Lloret 
157 Atlantic Avenue 
Staten Island, NY 10304 
Or you may purchase Ahoy/s monthly disk which has all the pro- 
grams in this issue of Ahoy! See page 66 for details. С 
SEE PROGRAM LISTING ON PAGE 79 
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SCUTTLIZIBUTT 


Continued from page 14 


Each is $19.95 tape, $22.95 
disk from Victory Software, Star- 
Byte, Inc., 2564 Industry Lane, 
Norristown, РА 19403 (phone: 
215-539-4300). 


Program an animated Pitfall Harry. 
READER SERVICE МО. 13 


Activision is offering C-64 us- 
ers a chance to put Pitfall Harry 
on their screens for just 25с. For 
that postage and handling fee 
they'll send a copy of 
Programming Pitfall Harry by 
Pitfall creator David Crane. The 
booklet contains a short (102-line) 
program that will generate a 
moving Pitfall Harry, and 
instructions for customizing the 
program by changing the back- 
ground scenery, the figure's speed 
and color, and so оп. 

Tape your quarter to a piece of 
paper, please, and mail to Activi- 
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sion Commodore 64 Club, P.O. 
Box 7287, Mountain View, CA 
94039 (phone: 415-960-0410). 
ivision also informs us that 
contracted to produce a 
game based on Ghostbusters, а 
film some of you may have seen. 
More details in a future issue. 
HES Games requires precise 


HES Games: practice for 1988. 
READER SERVICE NO. 18 


motor coordination to maneuver 
colorful animated athletes through 
such Olympic events as weightlift- 
ing, diving, running, long jump, 
archery, and hurdles. You may 
"instant replay" or save your best 
performances. For the C-64; 
$34.95. 

HesWare, 150 North Hill 
Drive, Brisbane, CA 94005 
(phone: 415- 468-4111) 

In the latest installment of Info- 
com's Tales of Adventure series, 
you're a deep-sea diver who must 
interact with a band of Cutthroats 
on an expedition for treasure. 
Price is $39.95 for the C-64 disk 
and Infocom's usual assortment of 
maps, books, clues, and artifacts. 
Cutthroats is designated a stan- 
dard level game, which Infocom 
describes as a good introductory 
level for adults. 

An even better introduction to 
text adventuring might be Info- 
com’s new Four-in-One Sampler, 
providing excerpts from The Wit- 
ness, Infidel, Planetfall, and Zork 
I, along with a tutorial on interac- 
tive fiction. Included is an $8 re- 
bate coupon on the purchase of 


any full-length Infocom title. 

А 16-page catalog of all Info- 
com's games and accessories is 
available free at many dealers. 

Infocom, Inc., 55 Wheeler 
Street, Cambridge, MA 02138 
(phone: 617-492-1031). 
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Туре ‘N’ Write: for computer users. 
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Just typing the names of all the 
typing tutorials out for the C-64 
would be practice enough to in- 
crease most people's speed by 10 
words per minute. Into this glutted 
marketplace comes HesWare's Type 
У Write, a program with а twi: 
its directed toward the computer, 
not the typewriter, keyboard. 

Instruction is provided in drill 
and touch typing, as well as in 
word processing and computer 
functions like word wrap, insert/ 
delete, cursor movement, saving, 
retrieving, and listing files, and 
40/80 column printing. Typing 
speed, words per minute, and 
number of errors are displayed 
onscreen. Included is a word pro- 
cessor that can create up to eight 
pages of text. C-64 cartridge; 
$29.95. 

HesWare, 150 North Hill Drive, 
Brisbane, CA 94005 (phone: 415- 
468-411). 

Two more trivia game releases 
added to last issue’s list: 

Factactics includes 2000 ques- 
tions on music, movies, sports, 
and Americana. Players progress 
around an onscreen gameboard by 
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IF YOU OWN А HOME COMPUTER 
THERE'S ONE NAME YOU SHOULD KNOW: 


ACTIVISION 


Pitfall ll 
challenges li 
and action of 
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supplying the missing fact in detailed statements via 
fill-in, multiple choice, or true/false. For the 64; 
$29.95. 

Daystar Learning Corporation, 525 University 
Avenue, Palo Alto, CA 94301 (phone: 415- 
323-3567). 

Trivia Mania offers C-64 users 1000 questions in 
6 categories and four levels of timed play. Diskette 
or board game is $39.95. 

Dynacomp, Inc., 1427 Monroe Avenue, Roches- 
ter, NY 14618 (phone: 716-442-8960). 


CREATING YOUR Own GAMES 


Continued from page 54 

out your own designs, just replace any of the 8-num- 
ber patterns with some of your own. As long as you 
always have eight numbers after the letter you want 
to replace in the DATA statement, your pattern will 
take the place of the character that begins the DATA 
statement. 

The Commodore 64 allows you to do even fancier 
things with your custom characters. Next month, 
we'll do some character-flipping—a technique that 
lets you do extremely fast animation with only a few 
POKEs. You not only can make pictures with char- 
acters—you can also make them move. O 

SEE PROGRAM LISTING ON PAGE 75 
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Continued from page 56 
ans). Mr. Steinberg also sent along a mnemonic he 
uses to remember the value of pi: 


See, 1 have a rhyme assisting 
My feeble brain, its task sometime resisting. 


The number of letters in each word corresponds to a 
digit in pi. 

‘As usual, there are many-more programs and 
ideas from all of you that wrote than we have room 
to print. Don't let that discourage you from writing 
and sharing. your thoughts, however. See you next 
month with more challenges. [1 


RUPERT REPORT 


Continued from page 91 

to which line A branches. 

Line 10250 defines the largest line number that is to 
be cross-referenced. By setting MX to 9999, this 
program will stop before analyzing itself. The first 
lines of the program in this listing are just to show 
the types of branch statements that are possible. The 
program you want to analyze will replace these lines. 
The first line of the program should be GOTO 10000 
in order to jump to the cross reference program. 

You also have the choice of sending the output to 
the screen or printer. You should change the file- 
number in line 10370 to a number less than 128 if 
your printer does not require a line to feed after 
each carriage return. The token codes in line 10270 
were determined from the program discussed earlier. 

This program steps its way through memory byte 
by byte, looking for keywords corresponding to 
branch statements. As written, it will not recognize 
GO ТО if they are separated. Notice from our сагі- 
ier program that GO, TO, and GOTO each have sep- 
arate tokens. If you normally leave a space between 
GO and TO, or if you just want to study this pro- 
gram, you might modify it to handle GO TO. 

If y analyzing a long program, you may 
have to increase the size of the array in line 10240. 
As dimensioned, it allows for 200 program lines and 
а maximum of ten branches within each line. You 
may inge those values to suit your needs. 

The executive program is in lines 10010 through 
10099. The comments and previously discussed con- 
cepts should make this program understandable. 

We have learned how BASIC programs are stored 
and may be analyzed. With this information you 
should be able to do some serious investigation, not 
to mention some tricky programming. You should 
now be able to see what is involved in a BASIC re- 
numbering program. Maybe you'd like to write one 
of your own. Other possibilities might be a variable 
cross-referencing program or a utility to selectively 
delete or rearrange line numbers. Dive in! The fun 
begins when you start exploring. O 

SEE PROGRAM LISTING ON PAGE 73 
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SELECTOR SWITCH 
ON YOUR 1541 
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ULTRA MAIL 
LETTER-PERFECT 


MAILING LIST 
PROGRAM 


ANIMATION 
THROUGH 


CHARACTER SET 
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SUDDENLY, 


YOU CAN DRAVV 
ANYTHING ON YOUR 
COMMODORE 641 


Put The Designer's Penc 
in your hands. And suddenly, 
using only a joyst 
can command all of y 
computer's graphic 
abilities. You don't even 
have to be able to 
draw, because the 
computer does 
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AND IF THAT 
ISNT MUSIC TO 
YOUR EARS, 
WRITEATUNE. 


The Designer's Pencil 
also lets you program 
it for you. And The al compositions to 
Designer's Pencil doesn't пу your visual 
just doodle around. It eces 
uses a revolutionary. sim pears 
ming technique called Pro, hoose your 
actual computerized graphics 
К number of spectacul 


sit d let your 


puter serenade you. Its a delight 


You'll be able to f - r Th 
lenge and satisfac е ‘Ou with its 
by Acti 


create new softw 
Commodore 64. Ev 
right on the screen as shown h 
Just choose what you wan еп enter the results 
watch as the computer carries out your 1 ncil $10,000 Contest. 

every wish Men in every specially-marked package. 


ое PICTURE YOURSELF A WINNER. 
n you be? We can't wait to 
er's Pencil to create 


signer's 


Designed by Garry Kitchen 


E DESIGNERS PENC SACIIVISION. 
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Now there's a sophisticated graph- 
ics system for your C-64—the 
Koala Light Pen System™ from 
Koala Technologies. It's easy. You 
work directly on your computer 
screen to draw, design, chart 
graphs. The Koala Light Pen 
System is all you need 


A State-Of-The-Art Light Pen 
We've packed all the electronics in 
the streamlined Koala Pen, using 
the most advanced miniaturization 
techniques. 
This means 
clearer, 
smoother, 
more precise 
graphics— 
and, unlike 
other C-64 
graphics products, you can use the 
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Release The Graphics Power 
Of Your Commodore 64... 


full range of the C-64's colors. It 
also has an easy-to-use tip-switch. 


Koala, well known for our graphics 
systems, has created the premier 


C-64 graphics package. It contains 
a complete array of graphics capa- 
bilities. In addition, you can dip into 
a palette of 16 colors—and over 

3,000 textured patterns. Point to 

"mirror" and a kaleidoscope of col- 
orful images bursts onto the screen. 
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With A Pen. 


Zoom in for 320 x 200 resolution. 
"Rubber band" lines and shapes. 


Explore the full graphics power of 
your C-64 with the Koala Light Pen 
System. There is no other system 
like it. 


The Koala Light Pen System™ 
and Graphics 64 Software?" 


Commodore ба * is a trademark ot Commodo 
© 1984 ког 
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